]> git.eshelyaron.com Git - emacs.git/commitdiff
(dired-diff): Use `dired-dwim-target-directory'
authorJuri Linkov <juri@jurta.org>
Sat, 1 May 2004 05:38:07 +0000 (05:38 +0000)
committerJuri Linkov <juri@jurta.org>
Sat, 1 May 2004 05:38:07 +0000 (05:38 +0000)
if current dired buffer has no buffer mark.

lisp/ChangeLog
lisp/dired-aux.el

index eecf77f488be834be9530def008d48c33222a258..4b61e5ceabb8893993ba7ef6adfd18c2c8de8a16 100644 (file)
@@ -14,6 +14,8 @@
 
        * dired-aux.el (dired-touch-initial): New fun.
        (dired-do-chxxx): Call it for op-symbol `touch'.
+       (dired-diff): Use `dired-dwim-target-directory'
+       if current dired buffer has no buffer mark.
 
        * bindings.el (propertized-buffer-identification):
        Replace `(:weight bold)' by `Buffer-menu-buffer-face'.
index dbc3d7630408e357973130a2e18035fbb9af8e58..b31d20782f38f25e6a0ec75ffefb73747bcce678 100644 (file)
@@ -64,7 +64,10 @@ With prefix arg, prompt for second argument SWITCHES,
                                   (if default
                                       (concat "(default " default ") ")
                                     ""))
-                          (dired-current-directory) default t)
+                          (if default
+                              (dired-current-directory)
+                            (dired-dwim-target-directory))
+                          default t)
           (if current-prefix-arg
               (read-string "Options for diff: "
                            (if (stringp diff-switches)