X-Git-Url: http://git.chise.org/gitweb/?a=blobdiff_plain;f=lisp%2Fupdate-elc.el;h=8a4527aecf131bcea328cb9d5224a2c74cac9f36;hb=9e004122928715a7579fcbfaf2e85155ac78a432;hp=45b5e1dc8367af79c3ac893519ff5d0045bf4b98;hpb=2e3e3f9ee27fec50f45c282d71eaddf7c673bc56;p=chise%2Fxemacs-chise.git

diff --git a/lisp/update-elc.el b/lisp/update-elc.el
index 45b5e1d..8a4527a 100644
--- a/lisp/update-elc.el
+++ b/lisp/update-elc.el
@@ -71,7 +71,7 @@
 (load "setup-paths.el")
 (load "dump-paths.el")
 
-(let ((autol (packages-list-autoloads)))
+(let ((autol (packages-list-autoloads (concat default-directory "../lisp"))))
   ;; (print (prin1-to-string autol))
   (while autol
     (let ((src (car autol)))
@@ -84,7 +84,7 @@
 ;; (print (prin1-to-string update-elc-files-to-compile))
 
 (let (preloaded-file-list site-load-packages)
-  (load (concat default-directory "../lisp/dumped-lisp.el"))
+  (load (expand-file-name "../lisp/dumped-lisp.el"))
 
   ;; Path setup
   (let ((package-preloaded-file-list