From adf0f2325e04a5e3b21ad7e166a7022075d75893 Mon Sep 17 00:00:00 2001 From: wlott <wlott> Date: Fri, 9 Feb 1990 21:08:09 +0000 Subject: [PATCH] Added -u switch to rcs-check-in-file. Shouldn't have taken -U all the way out... --- hemlock/rcs.lisp | 3 ++- 1 file changed, 2 insertions(+), 1 deletion(-) diff --git a/hemlock/rcs.lisp b/hemlock/rcs.lisp index fd74a539d..1381542be 100644 --- a/hemlock/rcs.lisp +++ b/hemlock/rcs.lisp @@ -1,6 +1,6 @@ ;;; -*- Package: HEMLOCK -*- ;;; -;;; $Header: /Volumes/share2/src/cmucl/cvs2git/cvsroot/src/hemlock/rcs.lisp,v 1.3 1990/02/09 19:10:08 wlott Exp $ +;;; $Header: /Volumes/share2/src/cmucl/cvs2git/cvsroot/src/hemlock/rcs.lisp,v 1.4 1990/02/09 21:08:09 wlott Exp $ ;;; ;;; Various commands for dealing with RCS under hemlock. ;;; @@ -108,6 +108,7 @@ (message "Checking in ~A ..." (namestring pathname)) (in-directory pathname (do-command "rcsci" `(,@(if keep-lock '("-l")) + "-u" ,(file-namestring pathname)) :input (make-hemlock-region-stream (buffer-region buffer)))) -- GitLab