]> git.eshelyaron.com Git - emacs.git/commitdiff
dired ‘M’ should not complain about ‘.’ and ‘..’
authorPaul Eggert <eggert@cs.ucla.edu>
Mon, 17 Apr 2017 06:36:26 +0000 (23:36 -0700)
committerPaul Eggert <eggert@cs.ucla.edu>
Mon, 17 Apr 2017 06:37:29 +0000 (23:37 -0700)
* lisp/dired-aux.el (dired-do-redisplay):
Allow redisplay of ‘.’ and ‘..’ (Bug#26528).

lisp/dired-aux.el

index d7ca052787927e27dfb0aa32ea1f65af8c13f5cc..ec07f9bf7355009f25997e1193ab9a96ccc5d9f2 100644 (file)
@@ -1266,12 +1266,14 @@ See Info node `(emacs)Subdir switches' for more details."
     ;; message much faster than making dired-map-over-marks show progress
     (dired-uncache
      (if (consp dired-directory) (car dired-directory) dired-directory))
-    (dired-map-over-marks (let ((fname (dired-get-filename))
+    (dired-map-over-marks (let ((fname (dired-get-filename nil t))
                                ;; Postpone readin hook till we map
                                ;; over all marked files (Bug#6810).
                                (dired-after-readin-hook nil))
-                           (message "Redisplaying... %s" fname)
-                           (dired-update-file-line fname))
+                           (if (not fname)
+                               (error "No file on this line")
+                             (message "Redisplaying... %s" fname)
+                             (dired-update-file-line fname)))
                          arg)
     (run-hooks 'dired-after-readin-hook)
     (dired-move-to-filename)