(dired-mode): Simplify.

diff --git a/lisp/ChangeLog b/lisp/ChangeLog
index 6a5aa6f645c9728176a2ca43cc67464acefbaa9f..2cbb919600536620a7101d9600cb9d3bae88eecf 100644 (file)
--- a/lisp/ChangeLog
+++ b/lisp/ChangeLog
@@ -1,3 +1,7 @@
+2005-05-17  Reiner Steib  <Reiner.Steib@gmx.de>
+
+       * dired.el (dired-mode): Simplify.
+
 2005-05-17  Lute Kamstra  <lute@gnu.org>
 
        * emacs-lisp/easy-mmode.el (define-minor-mode): Don't generate a

diff --git a/lisp/dired.el b/lisp/dired.el
index 60a9a7d35c1928b6bcd9b478ccae508c1d638402..43f05dcf8810fbb3bfa0e0bf4cbf0d7a1c1e247b 100644 (file)
--- a/lisp/dired.el
+++ b/lisp/dired.el
@@ -1549,9 +1549,8 @@ Keybindings:
   (setq dired-switches-alist nil)
   (dired-sort-other dired-actual-switches t)
   (when (featurep 'dnd)
-    (make-local-variable 'dnd-protocol-alist)
-    (setq dnd-protocol-alist
-         (append dired-dnd-protocol-alist dnd-protocol-alist)))
+    (set (make-local-variable 'dnd-protocol-alist)
+        (append dired-dnd-protocol-alist dnd-protocol-alist)))
   (run-mode-hooks 'dired-mode-hook))
 \f
 ;; Idiosyncratic dired commands that don't deal with marks.