From 820bde8d4914cc9cbc82a2cb180e668b5bc702fe Mon Sep 17 00:00:00 2001 From: "Richard M. Stallman" Date: Sat, 29 May 1993 03:10:35 +0000 Subject: [PATCH] (vc-steal-lock, vc-insert-headers): Fix question whitespace. --- lisp/vc.el | 6 +++--- 1 file changed, 3 insertions(+), 3 deletions(-) diff --git a/lisp/vc.el b/lisp/vc.el index 9fb699d9d03..bb5adb31249 100644 --- a/lisp/vc.el +++ b/lisp/vc.el @@ -99,7 +99,7 @@ The value is only computed when needed to avoid an expensive search.") (defvar vc-header-alist '((SCCS "\%W\%") (RCS "\$Id\$")) - "*Header keywords to be inserted when `vc-insert-header' is executed.") + "*Header keywords to be inserted when `vc-insert-headers' is executed.") (defconst vc-static-header-alist '(("\\.c$" . "\n#ifndef lint\nstatic char vcid[] = \"\%s\";\n#endif /* lint */\n")) @@ -553,7 +553,7 @@ level to check it in under. COMMENT, if specified, is the checkin comment." (interactive) (if (not owner) (setq owner (vc-locking-user file))) - (if (not (y-or-n-p (format "Take the lock on %s:%s from %s?" file rev owner))) + (if (not (y-or-n-p (format "Take the lock on %s:%s from %s? " file rev owner))) (error "Steal cancelled.")) (pop-to-buffer (get-buffer-create "*VC-mail*")) (setq default-directory (expand-file-name "~/")) @@ -790,7 +790,7 @@ the variable `vc-header-alist'." (save-restriction (widen) (if (or (not (vc-check-headers)) - (y-or-n-p "Version headers already exist. Insert another set?")) + (y-or-n-p "Version headers already exist. Insert another set? ")) (progn (let* ((delims (cdr (assq major-mode vc-comment-alist))) (comment-start-vc (or (car delims) comment-start "#"))