summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorDan Nicolaescu <dann@ics.uci.edu>2006-05-04 13:39:36 +0000
committerDan Nicolaescu <dann@ics.uci.edu>2006-05-04 13:39:36 +0000
commit4e0299e5780136c89f9286cbb101e2208b8eb5fe (patch)
tree0a221d898463ba93a8fff39c22efa13a48e86b18
parentf5c0ef7bd47ea9bfd01da6039c0a18c896c4e796 (diff)
downloademacs-4e0299e5780136c89f9286cbb101e2208b8eb5fe.tar.gz
(ibuffer-compressed-file-name-regexp): Avoid loading
regexp-opt at run time.
-rw-r--r--lisp/ChangeLog3
-rw-r--r--lisp/ibuffer.el9
2 files changed, 8 insertions, 4 deletions
diff --git a/lisp/ChangeLog b/lisp/ChangeLog
index 6e0da2e64db..626677de1d0 100644
--- a/lisp/ChangeLog
+++ b/lisp/ChangeLog
@@ -1,5 +1,8 @@
2006-05-04 Dan Nicolaescu <dann@ics.uci.edu>
+ * ibuffer.el (ibuffer-compressed-file-name-regexp): Avoid loading
+ regexp-opt at run time.
+
* term.el (term-handle-ansi-escape): Fix off by one error.
2006-05-04 Nick Roberts <nickrob@snap.net.nz>
diff --git a/lisp/ibuffer.el b/lisp/ibuffer.el
index 0a84f9b0c82..4b1069b26c1 100644
--- a/lisp/ibuffer.el
+++ b/lisp/ibuffer.el
@@ -324,13 +324,14 @@ directory, like `default-directory'."
:type '(repeat function)
:group 'ibuffer)
+(eval-when-compile
(defcustom ibuffer-compressed-file-name-regexp
- (concat "\\.\\("
- (regexp-opt '("arj" "bgz" "bz2" "gz" "lzh" "taz" "tgz" "zip" "z"))
- "\\)$")
+ (concat "\\.\\("
+ (regexp-opt '("arj" "bgz" "bz2" "gz" "lzh" "taz" "tgz" "zip" "z"))
+ "\\)$")
"Regexp to match compressed file names."
:type 'regexp
- :group 'ibuffer)
+ :group 'ibuffer))
(defcustom ibuffer-hook nil
"Hook run when `ibuffer' is called."