diff options
| author | Jim Blandy <jimb@redhat.com> | 1993-07-02 00:15:07 +0000 |
|---|---|---|
| committer | Jim Blandy <jimb@redhat.com> | 1993-07-02 00:15:07 +0000 |
| commit | 09fa0c97c95adb2a19bb9cfb943e7d92c0c806af (patch) | |
| tree | c2afa74bd228c0f28e8c1f43d61f18b09d921d75 /lisp/dired-aux.el | |
| parent | ad9a042aa5f2bdf3e935e5b021fefc3825d68280 (diff) | |
| download | emacs-09fa0c97c95adb2a19bb9cfb943e7d92c0c806af.tar.gz | |
* dired-aux.el (dired-diff): Work even when the mark is inactive.
Diffstat (limited to 'lisp/dired-aux.el')
| -rw-r--r-- | lisp/dired-aux.el | 4 |
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) |