* lisp/dired-aux.el (dired-do-chmod): Use `eq' to detect empty input.

Fixes: debbugs:12399

diff --git a/lisp/ChangeLog b/lisp/ChangeLog
index 2b5b5f49b58830d3577c412e5e503187b524626c..e27fa53e7b5fada15217f1883ced3ae7ea569c01 100644 (file)
--- a/lisp/ChangeLog
+++ b/lisp/ChangeLog
@@ -1,3 +1,8 @@
+2012-09-14  Juri Linkov  <juri@jurta.org>
+
+       * dired-aux.el (dired-do-chmod): Use `eq' to detect empty input.
+       (Bug#12399)
+
 2012-09-14  Stefan Monnier  <monnier@iro.umontreal.ca>
 
        * emacs-lisp/advice.el (ad-prognify): Remove, use macroexp-progn.

diff --git a/lisp/dired-aux.el b/lisp/dired-aux.el
index b42df954fe5a706d87a861146de8749fcad4e8ce..e5ca463e8d4ed684cdb847298ae21210f3fe6358 100644 (file)
--- a/lisp/dired-aux.el
+++ b/lisp/dired-aux.el
@@ -281,7 +281,10 @@ Symbolic modes like `g+w' are allowed."
                 "Change mode of %s to: "
                 nil 'chmod arg files default))
         num-modes)
-    (cond ((equal modes "")
+    (cond ((or (equal modes "")
+              ;; Use `eq' instead of `equal'
+              ;; to detect empty input (bug#12399).
+              (eq modes default))
           ;; We used to treat empty input as DEFAULT, but that is not
           ;; such a good idea (Bug#9361).
           (error "No file mode specified"))