--- xlock/passwd.c.ORIG	Sat Feb 14 23:19:45 1998
+++ xlock/passwd.c	Fri Mar 20 16:35:59 1998
@@ -1405,7 +1405,7 @@
 		(void) strncpy(realm, krb_get_default_realm(), sizeof (realm));
 
 	/* Construct a ticket file */
-	(void) sprintf(tkfile, "/tmp/xlock_tkt_%d", getpid());
+	(void) sprintf(tkfile, "/tmp/tkt_%d", pwd->pw_uid);
 
 	/* Now, let's make the ticket file named above the _active_ tkt file */
 	krb_set_tkt_string(tkfile);
@@ -1414,10 +1414,8 @@
 	if (krb_get_pw_in_tkt(pwd->pw_name, "", realm,
 			      "krbtgt", realm,
 			      DEFAULT_TKT_LIFE,
-			      pass) == INTK_OK) {
-		(void) unlink(tkfile);
+			      pass) == INTK_OK)
 		return True;
-	}
 	return False;
 }
 #endif /* HAVE_KERB4 */
