summaryrefslogtreecommitdiff
path: root/lisp
diff options
context:
space:
mode:
authorJim Blandy <jimb@redhat.com>1993-07-02 00:15:07 +0000
committerJim Blandy <jimb@redhat.com>1993-07-02 00:15:07 +0000
commit09fa0c97c95adb2a19bb9cfb943e7d92c0c806af (patch)
treec2afa74bd228c0f28e8c1f43d61f18b09d921d75 /lisp
parentad9a042aa5f2bdf3e935e5b021fefc3825d68280 (diff)
downloademacs-09fa0c97c95adb2a19bb9cfb943e7d92c0c806af.tar.gz
* dired-aux.el (dired-diff): Work even when the mark is inactive.
Diffstat (limited to 'lisp')
-rw-r--r--lisp/dired-aux.el4
1 files changed, 2 insertions, 2 deletions
diff --git a/lisp/dired-aux.el b/lisp/dired-aux.el
index 16b28fc4e1e..e83bb0fd5e6 100644
--- a/lisp/dired-aux.el
+++ b/lisp/dired-aux.el
@@ -45,8 +45,8 @@
FILE defaults to the file at the mark.
The prompted-for file is the first file given to `diff'."
(interactive
- (let ((default (if (mark)
- (save-excursion (goto-char (mark))
+ (let ((default (if (mark t)
+ (save-excursion (goto-char (mark t))
(dired-get-filename t t)))))
(list (read-file-name (format "Diff %s with: %s"
(dired-get-filename t)