X-Git-Url: http://git.chise.org/gitweb/?a=blobdiff_plain;f=lisp%2Floaddefs.el;h=6ec491490c20fad8aaba684c28f885c2bb262402;hb=5fdef766338d8616721791d753d0fc2737433e5b;hp=52458c3c12eed8a2cab97109f71db51aa7a366f1;hpb=a1655b870904de973c366d85ebdc8adde4ef5e1e;p=chise%2Fxemacs-chise.git-

diff --git a/lisp/loaddefs.el b/lisp/loaddefs.el
index 52458c3..6ec4914 100644
--- a/lisp/loaddefs.el
+++ b/lisp/loaddefs.el
@@ -85,7 +85,6 @@
 ;; are ignored in completion,
 ;; making it more likely you will get a unique match.
 (setq completion-ignored-extensions
-      (mapcar 'purecopy
 	      ;; this is way way way bogus.
 	      ;; completely wtf?
 	      ;; the only things that should be here are those that are
@@ -99,10 +98,10 @@
 ;		".aux" ".a" ".ln"
 ;		".lof" ".blg" ".bbl" ".glo" ".idx" ".lot" ".fmt"
 ;		".diff" ".oi" ".class")))
-	      '(".o" ".obj" ".elc" "~"
-		".bin" ".lbin" ;; #### these are doubtful, esp. the latter.
-		".dvi";; possibly doubtful, too.
-		".class")))
+      '(".o" ".obj" ".elc" "~"
+	".bin" ".lbin" ;; #### these are doubtful, esp. the latter.
+	".dvi";; possibly doubtful, too.
+	".class"))
 
 
 ;; This needs to be redone better. -slb