diff lisp/make-docfile.el @ 284:558f606b08ae r21-0b40

Import from CVS: tag r21-0b40
author cvs
date Mon, 13 Aug 2007 10:34:13 +0200
parents c5d627a313b1
children c6de09ad3017
line wrap: on
line diff
--- a/lisp/make-docfile.el	Mon Aug 13 10:33:19 2007 +0200
+++ b/lisp/make-docfile.el	Mon Aug 13 10:34:13 2007 +0200
@@ -77,7 +77,7 @@
 ;; Then process the list of Lisp files.
 (define-function 'defalias 'define-function)
 
-(setq load-path (decode-path-internal (getenv "EMACSBOOTSTRAPLOADPATH")))
+(setq load-path (split-path (getenv "EMACSBOOTSTRAPLOADPATH")))
 
 ;; Then process the autoloads
 (setq autoload-file-name "auto-autoloads.elc")
@@ -90,7 +90,7 @@
 
 (setq
  load-path
- (nconc load-path (decode-path-internal (getenv "EMACSBOOTSTRAPLOADPATH"))))
+ (nconc load-path (split-path (getenv "EMACSBOOTSTRAPLOADPATH"))))
 
 (let (preloaded-file-list)
   (load (concat default-directory "../lisp/dumped-lisp.el"))