From: Sean Whitton <spwhitton@spwhitton.name>
Date: Sat, 21 Jun 2025 18:03:54 +0000 (+0100)
Subject: ; * lisp/vc/vc.el (vc-checkin): Fix thinko.
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;p=emacs.git

; * lisp/vc/vc.el (vc-checkin): Fix thinko.

(cherry picked from commit c916f816e0f12f876868f9ffa1be4b070933bb6f)
---

diff --git a/lisp/vc/vc.el b/lisp/vc/vc.el
index 70f08aa36d8..b06f3f9103d 100644
--- a/lisp/vc/vc.el
+++ b/lisp/vc/vc.el
@@ -1949,7 +1949,7 @@ Runs the normal hooks `vc-before-checkin-hook' and `vc-checkin-hook'."
       ;; RCS 5.7 gripes about whitespace-only comments too.
       (unless (and comment (string-match "[^\t\n ]" comment))
         (setq comment "*** empty log message ***"))
-      (when register (vc-register (list backend files)))
+      (when register (vc-register (list backend register)))
       (cl-labels ((do-it ()
                     ;; We used to change buffers to get local value of
                     ;; `vc-checkin-switches', but the (singular) local