aboutsummaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
authorJim Blandy1993-07-06 06:18:50 +0000
committerJim Blandy1993-07-06 06:18:50 +0000
commitcf50f71757a88c37d8c35f458d53fbe697a8e11b (patch)
tree2b163e433c911244d736de3a740f3a4120097c63
parentfc593b05890222a0cbc128e2f8888a9d1405ced5 (diff)
downloademacs-cf50f71757a88c37d8c35f458d53fbe697a8e11b.tar.gz
emacs-cf50f71757a88c37d8c35f458d53fbe697a8e11b.zip
* 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.
-rw-r--r--lisp/vc.el2
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."
513 (set (make-local-variable 'vc-parent-buffer) parent) 513 (set (make-local-variable 'vc-parent-buffer) parent)
514 (set (make-local-variable 'vc-parent-buffer-name) 514 (set (make-local-variable 'vc-parent-buffer-name)
515 (concat " from " (buffer-name vc-parent-buffer))) 515 (concat " from " (buffer-name vc-parent-buffer)))
516 (vc-mode-line (if file (file-name-nondirectory file) " (no file)")) 516 (vc-mode-line (or file " (no file)"))
517 (vc-log-mode) 517 (vc-log-mode)
518 (setq vc-log-operation action) 518 (setq vc-log-operation action)
519 (setq vc-log-file file) 519 (setq vc-log-file file)