diff --git a/vtysh/vtysh_user.c b/vtysh/vtysh_user.c
index ecbe0f4..8698f8f 100644
--- a/vtysh/vtysh_user.c
+++ b/vtysh/vtysh_user.c
@@ -51,7 +51,7 @@
   pam_handle_t *pamh = NULL;
 
   /* Start PAM. */
-  ret = pam_start("zebra", user, &conv, &pamh);
+  ret = pam_start(QUAGGA_PROGNAME, user, &conv, &pamh);
   /* printf ("ret %d\n", ret); */
 
   /* Is user really user? */