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 "#"))