diff options
| -rw-r--r-- | lisp/ChangeLog | 5 | ||||
| -rw-r--r-- | lisp/ibuffer.el | 4 |
2 files changed, 6 insertions, 3 deletions
diff --git a/lisp/ChangeLog b/lisp/ChangeLog index 0f328678509..07e77906ccf 100644 --- a/lisp/ChangeLog +++ b/lisp/ChangeLog @@ -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): diff --git a/lisp/ibuffer.el b/lisp/ibuffer.el index a4762cfec10..6264d2e56b5 100644 --- a/lisp/ibuffer.el +++ b/lisp/ibuffer.el @@ -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) |