(vc-backend-checkin): Use vc-checkin-switches.

diff --git a/lisp/vc.el b/lisp/vc.el
index b72a763ea9f0d9886e2854707568eea1fe03e465..64fa052e0731c941770765735eb2e8700f920d3c 100644 (file)
--- a/lisp/vc.el
+++ b/lisp/vc.el
@@ -1981,9 +1981,9 @@ From a program, any arguments are passed to the `rcs2log' script."
     ;; Change buffers to get local value of vc-checkin-switches.
     (set-buffer (or (get-file-buffer file) (current-buffer)))
     (let ((switches
-          (if (stringp vc-checkout-switches)
-              (list vc-checkout-switches)
-            vc-checkout-switches)))
+          (if (stringp vc-checkin-switches)
+              (list vc-checkin-switches)
+            vc-checkin-switches)))
       ;; Clear the master-properties.  Do that here, not at the
       ;; end, because if the check-in fails we want them to get
       ;; re-computed before the next try.