Mercurial > emacs
changeset 49138:f955735e16d8
(dired-garbage-files-regexp): Use \\' instead of $ and
use regexp-opt for readability.
| author | Kai Großjohann <kgrossjo@eu.uu.net> |
|---|---|
| date | Fri, 10 Jan 2003 16:42:27 +0000 |
| parents | 7b5001b123ed |
| children | e807249d08c1 |
| files | lisp/ChangeLog lisp/dired.el |
| diffstat | 2 files changed, 8 insertions(+), 1 deletions(-) [+] |
line wrap: on
line diff
--- a/lisp/ChangeLog Fri Jan 10 12:49:38 2003 +0000 +++ b/lisp/ChangeLog Fri Jan 10 16:42:27 2003 +0000 @@ -1,3 +1,8 @@ +2003-01-10 Kai Gro,A_(Bjohann <kai.grossjohann@uni-duisburg.de> + + * dired.el (dired-garbage-files-regexp): Use \\' instead of $ and + use regexp-opt for readability. + 2003-01-10 Mark A. Hershberger <mah@everybody.org> * xml.el (xml-parse-tag, xml-parse-attlist, xml-skip-dtd)
--- a/lisp/dired.el Fri Jan 10 12:49:38 2003 +0000 +++ b/lisp/dired.el Fri Jan 10 16:42:27 2003 +0000 @@ -2570,7 +2570,9 @@ "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 ()