diff options
| author | Jim Blandy <jimb@redhat.com> | 1993-07-06 06:18:50 +0000 |
|---|---|---|
| committer | Jim Blandy <jimb@redhat.com> | 1993-07-06 06:18:50 +0000 |
| commit | cf50f71757a88c37d8c35f458d53fbe697a8e11b (patch) | |
| tree | 2b163e433c911244d736de3a740f3a4120097c63 /lisp/vc.el | |
| parent | fc593b05890222a0cbc128e2f8888a9d1405ced5 (diff) | |
| download | emacs-cf50f71757a88c37d8c35f458d53fbe697a8e11b.tar.gz | |
* vc.el (vc-start-entry): Don't call file-name-nondirectory on
FILE before passing it to vc-mode-line. Everyplace else passes
vc-mode-line full filenames, and vc-mode-line now needs the real
file name to decide which version-control system the file is under.
Diffstat (limited to 'lisp/vc.el')
| -rw-r--r-- | lisp/vc.el | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/lisp/vc.el b/lisp/vc.el index 830444feee6..6670ed68e9a 100644 --- a/lisp/vc.el +++ b/lisp/vc.el @@ -513,7 +513,7 @@ lock steals will raise an error." (set (make-local-variable 'vc-parent-buffer) parent) (set (make-local-variable 'vc-parent-buffer-name) (concat " from " (buffer-name vc-parent-buffer))) - (vc-mode-line (if file (file-name-nondirectory file) " (no file)")) + (vc-mode-line (or file " (no file)")) (vc-log-mode) (setq vc-log-operation action) (setq vc-log-file file) |