diff options
| author | Juri Linkov <juri@linkov.net> | 2022-10-02 21:34:57 +0300 |
|---|---|---|
| committer | Juri Linkov <juri@linkov.net> | 2022-10-02 21:34:57 +0300 |
| commit | c37fda9e3117c8948ee691c79ccf747d45137d97 (patch) | |
| tree | 7f2ef8aaecc3956aab27fd22bd23df813f103072 /lisp/vc/vc.el | |
| parent | d4f56e96665f1d2d98ce645d32d587013e8b8116 (diff) | |
| download | emacs-c37fda9e3117c8948ee691c79ccf747d45137d97.tar.gz | |
In vc-git-log-incoming use the repository in the command "fetch" (bug#50340)
* lisp/vc/vc-git.el (vc-git-log-incoming): Use repository part
from non-nil remote-location in the command "fetch".
* lisp/vc/vc.el (vc-log-incoming, vc-log-outgoing): Mention in
docstrings and prompts that REMOTE-LOCATION can be a remote branch name.
* doc/emacs/maintaining.texi (VC Change Log): For commands
vc-log-incoming and vc-log-outgoing, use the term "remote location"
instead of "repository".
Diffstat (limited to 'lisp/vc/vc.el')
| -rw-r--r-- | lisp/vc/vc.el | 10 |
1 files changed, 6 insertions, 4 deletions
diff --git a/lisp/vc/vc.el b/lisp/vc/vc.el index 25bb0c848d8..787dd51d073 100644 --- a/lisp/vc/vc.el +++ b/lisp/vc/vc.el @@ -2765,10 +2765,11 @@ with its diffs (if the underlying VCS supports that)." ;;;###autoload (defun vc-log-incoming (&optional remote-location) "Show log of changes that will be received with pull from REMOTE-LOCATION. -When called interactively with a prefix argument, prompt for REMOTE-LOCATION." +When called interactively with a prefix argument, prompt for REMOTE-LOCATION. +In some version control systems REMOTE-LOCATION can be a remote branch name." (interactive (when current-prefix-arg - (list (read-string "Remote location (empty for default): ")))) + (list (read-string "Remote location/branch (empty for default): ")))) (let ((backend (vc-deduce-backend))) (unless backend (error "Buffer is not version controlled")) @@ -2778,10 +2779,11 @@ When called interactively with a prefix argument, prompt for REMOTE-LOCATION." ;;;###autoload (defun vc-log-outgoing (&optional remote-location) "Show log of changes that will be sent with a push operation to REMOTE-LOCATION. -When called interactively with a prefix argument, prompt for REMOTE-LOCATION." +When called interactively with a prefix argument, prompt for REMOTE-LOCATION. +In some version control systems REMOTE-LOCATION can be a remote branch name." (interactive (when current-prefix-arg - (list (read-string "Remote location (empty for default): ")))) + (list (read-string "Remote location/branch (empty for default): ")))) (let ((backend (vc-deduce-backend))) (unless backend (error "Buffer is not version controlled")) |