diff options
| author | Juri Linkov <juri@jurta.org> | 2004-03-31 16:09:18 +0000 |
|---|---|---|
| committer | Juri Linkov <juri@jurta.org> | 2004-03-31 16:09:18 +0000 |
| commit | 293997b60e9a2463ba453cf7e9626f9a49708aa5 (patch) | |
| tree | 8331d02e8449c549ca0e90fdbb262f61a32d401e | |
| parent | 564ed5568d3d3d48cc96e856904ba453f1d200f4 (diff) | |
| download | emacs-293997b60e9a2463ba453cf7e9626f9a49708aa5.tar.gz | |
(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." ;; Karsten Wenger <kw@cis.uni-muenchen.de> fixed uid. (setq uid (buffer-substring (+ (point) 1) (progn (forward-word 1) (point)))) - (re-search-forward "\\(Jan\\|Feb\\|Mar\\|Apr\\|May\\|Jun\\|\ -Jul\\|Aug\\|Sep\\|Oct\\|Nov\\|Dec\\)") + (re-search-forward dired-move-to-filename-regexp) (goto-char (match-beginning 1)) (forward-char -1) (setq size (string-to-int (buffer-substring (save-excursion |