(ibuffer-compressed-file-name-regexp): Avoid `regexp-opt' and simplify

regexp for readability.
This commit is contained in:
John Paul Wallington 2006-05-07 00:00:12 +00:00
parent 535c8bdb2b
commit fe99056f6b
2 changed files with 6 additions and 3 deletions

View file

@ -1,3 +1,8 @@
2006-05-07 John Paul Wallington <jpw@pobox.com>
* ibuffer.el (ibuffer-compressed-file-name-regexp): Avoid
`regexp-opt'; simplify regexp for readability.
2006-05-06 Eli Zaretskii <eliz@gnu.org>
* ldefs-boot.el (dired-do-redisplay, dired-maybe-insert-subdir):

View file

@ -325,9 +325,7 @@ directory, like `default-directory'."
:group 'ibuffer)
(defcustom ibuffer-compressed-file-name-regexp
(concat "\\.\\("
(regexp-opt '("arj" "bgz" "bz2" "gz" "lzh" "taz" "tgz" "zip" "z"))
"\\)$")
"\\.\\(arj\\|bgz\\|bz2\\|gz\\|lzh\\|taz\\|tgz\\|zip\\|z\\)$"
"Regexp to match compressed file names."
:type 'regexp
:group 'ibuffer)