diff options
| author | Juri Linkov | 2004-03-31 16:09:18 +0000 |
|---|---|---|
| committer | Juri Linkov | 2004-03-31 16:09:18 +0000 |
| commit | 43ee73f576c843ebe58071add1739e14682c3271 (patch) | |
| tree | 8b8b4256eda2f1a3572ce7a2ac06bf031ac3621d | |
| parent | 778f4651d52478fbe09ef639e90d89c5e3a7db66 (diff) | |
| download | emacs-43ee73f576c843ebe58071add1739e14682c3271.tar.gz emacs-43ee73f576c843ebe58071add1739e14682c3271.zip | |
(dired-mark-sexp): Replace hard-coded month names with `dired-move-to-filename-regexp'.
| -rw-r--r-- | lisp/dired-x.el | 3 |
1 files changed, 1 insertions, 2 deletions
diff --git a/lisp/dired-x.el b/lisp/dired-x.el index fc30428e562..21fe4902e58 100644 --- a/lisp/dired-x.el +++ b/lisp/dired-x.el | |||
| @@ -1517,8 +1517,7 @@ to mark all zero length files." | |||
| 1517 | ;; Karsten Wenger <kw@cis.uni-muenchen.de> fixed uid. | 1517 | ;; Karsten Wenger <kw@cis.uni-muenchen.de> fixed uid. |
| 1518 | (setq uid (buffer-substring (+ (point) 1) | 1518 | (setq uid (buffer-substring (+ (point) 1) |
| 1519 | (progn (forward-word 1) (point)))) | 1519 | (progn (forward-word 1) (point)))) |
| 1520 | (re-search-forward "\\(Jan\\|Feb\\|Mar\\|Apr\\|May\\|Jun\\|\ | 1520 | (re-search-forward dired-move-to-filename-regexp) |
| 1521 | Jul\\|Aug\\|Sep\\|Oct\\|Nov\\|Dec\\)") | ||
| 1522 | (goto-char (match-beginning 1)) | 1521 | (goto-char (match-beginning 1)) |
| 1523 | (forward-char -1) | 1522 | (forward-char -1) |
| 1524 | (setq size (string-to-int (buffer-substring (save-excursion | 1523 | (setq size (string-to-int (buffer-substring (save-excursion |