diff options
author | Richard M. Stallman <rms@gnu.org> | 1997-08-23 06:17:08 +0000 |
---|---|---|
committer | Richard M. Stallman <rms@gnu.org> | 1997-08-23 06:17:08 +0000 |
commit | df70b21f0049a59c1142989afd63adb1e9b79506 (patch) | |
tree | de6ad09865a72dedce8f883a373ddd3705d35c1a /lisp | |
parent | 28d0e4dc88e44056462f1f8246fe78cd5c426da7 (diff) | |
download | emacs-df70b21f0049a59c1142989afd63adb1e9b79506.tar.gz |
(vc-version-diff): Mention that default file is visited file.
Diffstat (limited to 'lisp')
-rw-r--r-- | lisp/vc.el | 4 |
1 files changed, 3 insertions, 1 deletions
diff --git a/lisp/vc.el b/lisp/vc.el index e945002ffd5..a49092e79e2 100644 --- a/lisp/vc.el +++ b/lisp/vc.el @@ -1301,7 +1301,9 @@ and two version designators specifying which versions to compare." If FILE is a directory, generate diffs between versions for all registered files in or below it." (interactive - (let ((file (read-file-name "File or directory to diff: " + (let ((file (read-file-name (if buffer-file-name + "File or dir to diff: (default visited file) " + "File or dir to diff: ") default-directory buffer-file-name t)) (rel1-default nil) (rel2-default nil)) ;; compute default versions based on the file state |