Commit 79d00189 authored by Richard M. Stallman's avatar Richard M. Stallman
Browse files

(vc-version-diff): Mention that default file is visited file.

parent 6c455d5c
...@@ -1301,7 +1301,9 @@ and two version designators specifying which versions to compare." ...@@ -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 If FILE is a directory, generate diffs between versions for all registered
files in or below it." files in or below it."
(interactive (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)) default-directory buffer-file-name t))
(rel1-default nil) (rel2-default nil)) (rel1-default nil) (rel2-default nil))
;; compute default versions based on the file state ;; compute default versions based on the file state
......
Markdown is supported
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment