# HG changeset patch # User Jim Blandy # Date 741572107 0 # Node ID 6e13c3b03b67475be5dfc08c053f50df970bfca6 # Parent d95172e91f4e975ca266823075e8f630b0630673 * dired-aux.el (dired-diff): Work even when the mark is inactive. diff -r d95172e91f4e -r 6e13c3b03b67 lisp/dired-aux.el --- a/lisp/dired-aux.el Thu Jul 01 23:35:51 1993 +0000 +++ b/lisp/dired-aux.el Fri Jul 02 00:15:07 1993 +0000 @@ -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)