(dired-add-entry): Avoid munging long-form Dired switches (Bug#2261).

diff --git a/lisp/dired-aux.el b/lisp/dired-aux.el
index 3bc5f4b..9d34d95 100644 (file)
--- a/lisp/dired-aux.el
+++ b/lisp/dired-aux.el
@@ -1074,7 +1074,7 @@ See Info node `(emacs)Subdir switches' for more details."
              ;; Don't expand `.'.  Show just the file name within directory.
              (let ((default-directory directory))
                (dired-insert-directory directory
-                                       (concat dired-actual-switches "d")
+                                       (concat dired-actual-switches " -d")
                                        (list filename)))
               (goto-char opoint)
              ;; Put in desired marker char.