diff options
Diffstat (limited to 'lisp/vc/vc-hooks.el')
| -rw-r--r-- | lisp/vc/vc-hooks.el | 6 |
1 files changed, 6 insertions, 0 deletions
diff --git a/lisp/vc/vc-hooks.el b/lisp/vc/vc-hooks.el index 251fecb49c0..bae991936b5 100644 --- a/lisp/vc/vc-hooks.el +++ b/lisp/vc/vc-hooks.el @@ -883,6 +883,8 @@ current, and kill the buffer that visits the link." (define-key map "u" 'vc-revert) (define-key map "v" 'vc-next-action) (define-key map "+" 'vc-update) + ;; I'd prefer some kind of symmetry with vc-update: + (define-key map "P" 'vc-push) (define-key map "=" 'vc-diff) (define-key map "D" 'vc-root-diff) (define-key map "~" 'vc-revision-other-window) @@ -940,6 +942,10 @@ current, and kill the buffer that visits the link." (bindings--define-key map [vc-revert] '(menu-item "Revert to Base Version" vc-revert :help "Revert working copies of the selected file set to their repository contents")) + ;; TODO Only :enable if (vc-find-backend-function backend 'push) + (bindings--define-key map [vc-push] + '(menu-item "Push Changes" vc-push + :help "Push the current branch's changes")) (bindings--define-key map [vc-update] '(menu-item "Update to Latest Version" vc-update :help "Update the current fileset's files to their tip revisions")) |