Tweak binding of `+' in vc-dir

* lisp/vc/vc-dir.el (vc-dir-mode-map): Point to the actual
function instead of the alias.  This makes *Help* more helpful.

diff --git a/lisp/vc/vc-dir.el b/lisp/vc/vc-dir.el
index b4568727ea08119f3a44f077e514b5efdcae23c2..037de415e620bdbec6cc66e3790b5d9def7749b5 100644 (file)
--- a/lisp/vc/vc-dir.el
+++ b/lisp/vc/vc-dir.el
@@ -266,7 +266,7 @@ See `run-hooks'."
                  :enable (vc-find-backend-function vc-dir-backend 'push)
                  :help "Push the current branch's changes"))
     (define-key map [update]
-      '(menu-item "Update to Latest Version" vc-update
+      '(menu-item "Update to Latest Version" vc-pull
                  :help "Update the current fileset's files to their tip revisions"))
     (define-key map [revert]
       '(menu-item "Revert to Base Version" vc-revert
@@ -306,8 +306,8 @@ See `run-hooks'."
     (define-key map "=" #'vc-diff)        ;; C-x v =
     (define-key map "D" #'vc-root-diff)           ;; C-x v D
     (define-key map "i" #'vc-register)    ;; C-x v i
-    (define-key map "+" #'vc-update)      ;; C-x v +
-    ;; I'd prefer some kind of symmetry with vc-update:
+    (define-key map "+" #'vc-pull)        ;; C-x v +
+    ;; I'd prefer some kind of symmetry with vc-pull:
     (define-key map "P" #'vc-push)        ;; C-x v P
     (define-key map "l" #'vc-print-log)           ;; C-x v l
     (define-key map "L" #'vc-print-root-log) ;; C-x v L