diff options
-rw-r--r-- | lisp/vc/vc-dir.el | 5 | ||||
-rw-r--r-- | lisp/vc/vc-git.el | 2 |
2 files changed, 5 insertions, 2 deletions
diff --git a/lisp/vc/vc-dir.el b/lisp/vc/vc-dir.el index 41b1087ee59..be1084d4abe 100644 --- a/lisp/vc/vc-dir.el +++ b/lisp/vc/vc-dir.el @@ -786,6 +786,11 @@ that share the same state." (display-buffer (find-file-noselect (vc-dir-current-file)) t)) +(defun vc-dir-view-file () + "Examine a file on the current line in view mode." + (interactive) + (view-file (vc-dir-current-file))) + (defun vc-dir-isearch () "Search for a string through all marked buffers using Isearch." (interactive) diff --git a/lisp/vc/vc-git.el b/lisp/vc/vc-git.el index f62e1083229..8b828563325 100644 --- a/lisp/vc/vc-git.el +++ b/lisp/vc/vc-git.el @@ -1048,7 +1048,6 @@ If LIMIT is a revision string, use it as an end-revision." '("--"))))))) (defun vc-git-log-outgoing (buffer remote-location) - (interactive) (vc-setup-buffer buffer) (vc-git-command buffer 'async nil @@ -1062,7 +1061,6 @@ If LIMIT is a revision string, use it as an end-revision." "..HEAD"))) (defun vc-git-log-incoming (buffer remote-location) - (interactive) (vc-setup-buffer buffer) (vc-git-command nil 0 nil "fetch") (vc-git-command |