Mercurial > emacs
comparison lisp/ibuffer.el @ 70489:1fa9bcad4532
(ibuffer-compressed-file-name-regexp): Avoid `regexp-opt' and simplify
regexp for readability.
author | John Paul Wallington <jpw@pobox.com> |
---|---|
date | Sat, 06 May 2006 23:58:31 +0000 |
parents | cd97ab744c2d |
children | 7483188f3c91 146cd8369025 |
comparison
equal
deleted
inserted
replaced
70488:5087aed8b6e3 | 70489:1fa9bcad4532 |
---|---|
323 "List of \"Help\" major modes." | 323 "List of \"Help\" major modes." |
324 :type '(repeat function) | 324 :type '(repeat function) |
325 :group 'ibuffer) | 325 :group 'ibuffer) |
326 | 326 |
327 (defcustom ibuffer-compressed-file-name-regexp | 327 (defcustom ibuffer-compressed-file-name-regexp |
328 (concat "\\.\\(" | 328 "\\.\\(arj\\|bgz\\|bz2\\|gz\\|lzh\\|taz\\|tgz\\|zip\\|z\\)$" |
329 (regexp-opt '("arj" "bgz" "bz2" "gz" "lzh" "taz" "tgz" "zip" "z")) | |
330 "\\)$") | |
331 "Regexp to match compressed file names." | 329 "Regexp to match compressed file names." |
332 :type 'regexp | 330 :type 'regexp |
333 :group 'ibuffer) | 331 :group 'ibuffer) |
334 | 332 |
335 (defcustom ibuffer-hook nil | 333 (defcustom ibuffer-hook nil |