===================================================================
RCS file: /cvsrepo/anoncvs/cvs/src/usr.bin/rcs/rcsclean.c,v
retrieving revision 1.18
retrieving revision 1.19
diff -u -r1.18 -r1.19
--- src/usr.bin/rcs/rcsclean.c	2005/11/28 14:43:59	1.18
+++ src/usr.bin/rcs/rcsclean.c	2005/12/08 18:56:10	1.19
@@ -1,4 +1,4 @@
-/*	$OpenBSD: rcsclean.c,v 1.18 2005/11/28 14:43:59 xsa Exp $	*/
+/*	$OpenBSD: rcsclean.c,v 1.19 2005/12/08 18:56:10 joris Exp $	*/
 /*
  * Copyright (c) 2005 Joris Vink <joris@openbsd.org>
  * All rights reserved.
@@ -43,6 +43,7 @@
 static int kflag = RCS_KWEXP_ERR;
 static int uflag = 0;
 static int flags = 0;
+static char *locker = NULL;
 
 int
 rcsclean_main(int argc, char **argv)
@@ -97,6 +98,9 @@
 	argc -= rcs_optind;
 	argv += rcs_optind;
 
+	if ((locker = getlogin()) == NULL)
+		exit(1);
+
 	if (argc == 0) {
 		if ((dirp = opendir(".")) == NULL) {
 			cvs_log(LP_ERRNO, "failed to open directory '.'");
@@ -196,7 +200,7 @@
 				    rcsnum_tostr(frev, numb, sizeof(numb)),
 				    fpath);
 			}
-			(void)rcs_lock_remove(file, frev);
+			(void)rcs_lock_remove(file, locker, frev);
 		}
 
 		if (TAILQ_EMPTY(&(file->rf_locks))) {