# HG changeset patch
# User Reiner Steib <Reiner.Steib@gmx.de>
# Date 1116350616 0
# Node ID af763a03ded2f22e6086f125c13b59a8b6579913
# Parent  5f5663f8c03822500f4db0cfb2f86f81a4da0dbe
(dired-mode): Simplify.

diff -r 5f5663f8c038 -r af763a03ded2 lisp/ChangeLog
--- a/lisp/ChangeLog	Tue May 17 16:31:24 2005 +0000
+++ b/lisp/ChangeLog	Tue May 17 17:23:36 2005 +0000
@@ -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 -r 5f5663f8c038 -r af763a03ded2 lisp/dired.el
--- a/lisp/dired.el	Tue May 17 16:31:24 2005 +0000
+++ b/lisp/dired.el	Tue May 17 17:23:36 2005 +0000
@@ -1549,9 +1549,8 @@
   (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))
 
 ;; Idiosyncratic dired commands that don't deal with marks.