Mercurial > hg > xemacs-beta

diff lisp/loadup.el @ 312:d1b52dcaa789 r21-0b54

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
Import from CVS: tag r21-0b54
author cvs
date Mon, 13 Aug 2007 10:43:55 +0200
parents 33bdb3d4b97f
children cc15677e0335
line wrap: on
line diff
--- a/lisp/loadup.el	Mon Aug 13 10:43:30 2007 +0200
+++ b/lisp/loadup.el	Mon Aug 13 10:43:55 2007 +0200
@@ -64,7 +64,6 @@
 	;; the package path.
 	;; #### This code is duplicated in two other places.
 	(let ((temp-path (expand-file-name "." (car load-path))))
-	  (setq source-directory temp-path)
 	  (setq load-path (nconc (mapcar
 				  #'(lambda (i) (concat i "/"))
 				  (directory-files temp-path t "^[^-.]"