aboutsummaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
-rw-r--r--lisp/dired.el14
1 files changed, 3 insertions, 11 deletions
diff --git a/lisp/dired.el b/lisp/dired.el
index b8ebaa1f63e..f87f02a6958 100644
--- a/lisp/dired.el
+++ b/lisp/dired.el
@@ -1154,18 +1154,10 @@ Optional arg NO-ERROR-IF-NOT-FILEP means return nil if no filename on
1154 ;; This is the UNIX version. 1154 ;; This is the UNIX version.
1155 (or eol (setq eol (progn (end-of-line) (point)))) 1155 (or eol (setq eol (progn (end-of-line) (point))))
1156 (beginning-of-line) 1156 (beginning-of-line)
1157 (if (re-search-forward 1157 (if (and (re-search-forward dired-move-to-filename-regexp eol t)
1158 dired-move-to-filename-regexp 1158 (looking-at " \\([0-9][0-9]:[0-9][0-9]\\| [0-9]+\\|[0-9]+ \\) "))
1159 eol t)
1160 (progn 1159 (progn
1161 (skip-chars-forward " ") ; there is one SPC after day of month 1160 (goto-char (match-end 0))
1162 (skip-chars-forward "^ " eol) ; move after time of day (or year)
1163 (skip-chars-forward " " eol) ; there is space before the file name
1164 ;; Actually, if the year instead of clock time is displayed,
1165 ;; there are (only for some ls programs?) two spaces instead
1166 ;; of one before the name.
1167 ;; If we could depend on ls inserting exactly one SPC we
1168 ;; would not bomb on names _starting_ with SPC.
1169 (point)) 1161 (point))
1170 (if raise-error 1162 (if raise-error
1171 (error "No file on this line") 1163 (error "No file on this line")