kalev / rpms / util-linux

Forked from rpms/util-linux 4 years ago
Clone
6356810
diff -urb util-linux-2.12a.orig/login-utils/login.c util-linux-2.12a/login-utils/login.c
6356810
--- util-linux-2.12a.orig/login-utils/login.c	2005-04-08 09:43:37.000000000 -0400
6356810
+++ util-linux-2.12a/login-utils/login.c	2005-04-08 11:14:37.850579656 -0400
6356810
@@ -703,6 +703,8 @@
6356810
     PAM_FAIL_CHECK;
6356810
 
6356810
     retcode = pam_setcred(pamh, PAM_ESTABLISH_CRED);
6356810
+    if (retcode != PAM_SUCCESS)
6356810
+	    pam_close_session(pamh, 0);
6356810
     PAM_FAIL_CHECK;
6356810
 
6356810
 #else /* ! USE_PAM */