diff options
| author | Kai Großjohann <kgrossjo@eu.uu.net> | 2003-01-10 16:42:27 +0000 |
|---|---|---|
| committer | Kai Großjohann <kgrossjo@eu.uu.net> | 2003-01-10 16:42:27 +0000 |
| commit | d4aeef3b961bcbfb78a388683f64a4ce971fda26 (patch) | |
| tree | d3f07a22c3167dc9709e875561463c558fc4afb6 /lisp/dired.el | |
| parent | 4abc7470be618162b965f45ca02825303931015f (diff) | |
| download | emacs-d4aeef3b961bcbfb78a388683f64a4ce971fda26.tar.gz | |
(dired-garbage-files-regexp): Use \\' instead of $ and
use regexp-opt for readability.
Diffstat (limited to 'lisp/dired.el')
| -rw-r--r-- | lisp/dired.el | 4 |
1 files changed, 3 insertions, 1 deletions
diff --git a/lisp/dired.el b/lisp/dired.el index 9dbde910911..160fee7d34b 100644 --- a/lisp/dired.el +++ b/lisp/dired.el @@ -2570,7 +2570,9 @@ A prefix argument says to unflag those files instead." "auto save file"))) (defvar dired-garbage-files-regexp - "\\.log$\\|\\.toc$\\|\\.dvi$\\|\\.bak$\\|\\.orig$\\|\\.rej$\\|.aux$" + (concat (regexp-opt + '(".log" ".toc" ".dvi" ".bak" ".orig" ".rej" ".aux")) + "\\'") "*Regular expression to match \"garbage\" files for `dired-flag-garbage-files'.") (defun dired-flag-garbage-files () |