mirror/emacs
1
0
Fork 0
mirror of https://git.savannah.gnu.org/git/emacs.git synced 2025-01-19 18:13:55 +00:00
Code Issues Releases Activity

(dired-garbage-files-regexp): Use \\' instead of $ and

Browse Source 
use regexp-opt for readability.
This commit is contained in:
Kai Großjohann 2003-01-10 16:42:27 +00:00
parent 4abc7470be
commit d4aeef3b96
2 changed files with 8 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

5
lisp/ChangeLog
View File

@ -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)

4
lisp/dired.el
View File

@ -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 ()