summaryrefslogtreecommitdiff
path: root/lisp/jka-cmpr-hook.el
diff options
context:
space:
mode:
Diffstat (limited to 'lisp/jka-cmpr-hook.el')
-rw-r--r--lisp/jka-cmpr-hook.el3
1 files changed, 2 insertions, 1 deletions
diff --git a/lisp/jka-cmpr-hook.el b/lisp/jka-cmpr-hook.el
index fab5c6ba925..6697d241987 100644
--- a/lisp/jka-cmpr-hook.el
+++ b/lisp/jka-cmpr-hook.el
@@ -71,10 +71,11 @@ Otherwise, it is nil.")
(defun jka-compr-build-file-regexp ()
+ (purecopy
(mapconcat
'jka-compr-info-regexp
jka-compr-compression-info-list
- "\\|"))
+ "\\|")))
;; Functions for accessing the return value of jka-compr-get-compression-info
(defun jka-compr-info-regexp (info) (aref info 0))