diff options
author | Dan Nicolaescu <dann@ics.uci.edu> | 2006-05-04 13:39:36 +0000 |
---|---|---|
committer | Dan Nicolaescu <dann@ics.uci.edu> | 2006-05-04 13:39:36 +0000 |
commit | 4e0299e5780136c89f9286cbb101e2208b8eb5fe (patch) | |
tree | 0a221d898463ba93a8fff39c22efa13a48e86b18 | |
parent | f5c0ef7bd47ea9bfd01da6039c0a18c896c4e796 (diff) | |
download | emacs-4e0299e5780136c89f9286cbb101e2208b8eb5fe.tar.gz |
(ibuffer-compressed-file-name-regexp): Avoid loading
regexp-opt at run time.
-rw-r--r-- | lisp/ChangeLog | 3 | ||||
-rw-r--r-- | lisp/ibuffer.el | 9 |
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." |