X-Git-Url: http://git.chise.org/gitweb/?p=chise%2Fxemacs-chise.git.1;a=blobdiff_plain;f=lisp%2Fcode-files.el;h=d74a11ca15b9f2b59899f2f6cb1c7302f6584ee4;hp=accbc0d91fc4a6a6273ec6ee71c226248e2ddcca;hb=976b002b16336930724ae22476014583ad022e7d;hpb=eb1f7fa6e0f89ff92b86f02c7cbdee048edd8b0d

diff --git a/lisp/code-files.el b/lisp/code-files.el
index accbc0d..d74a11c 100644
--- a/lisp/code-files.el
+++ b/lisp/code-files.el
@@ -271,7 +271,7 @@ Return t if file exists."
       (if (or (<= (length filename) 0)
 	      (null (setq path
 			  (locate-file filename load-path
-				       (and (not nosuffix) ".elc:.el:")))))
+				       (and (not nosuffix) '(".elc" ".el" ""))))))
 	  (and (null noerror)
 	       (signal 'file-error (list "Cannot open load file" filename)))
 	;; now use the internal load to actually load the file.