Mercurial > hg > xemacs-beta

diff lisp/update-elc.el @ 278:90d73dddcdc4 r21-0b37

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
Import from CVS: tag r21-0b37
author cvs
date Mon, 13 Aug 2007 10:31:29 +0200
parents 6330739388db
children 558f606b08ae
line wrap: on
line diff
--- a/lisp/update-elc.el	Mon Aug 13 10:30:38 2007 +0200
+++ b/lisp/update-elc.el	Mon Aug 13 10:31:29 2007 +0200
@@ -81,12 +81,6 @@
 		(cons src update-elc-files-to-compile))))
     (setq autol (cdr autol))))
 
-;; We must have some lisp support at this point
-(let ((temp-path (expand-file-name "." (car load-path))))
-  (setq load-path (nconc (directory-files temp-path t "^[^-.]"
-					  nil 'dirs-only)
-			 (cons temp-path load-path))))
-
 ;; (print (prin1-to-string update-elc-files-to-compile))
 
 (let (preloaded-file-list site-load-packages)