Mercurial > hg > xemacs-beta

comparison lisp/make-docfile.el @ 265:8efd647ea9ca r20-5b31

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
Import from CVS: tag r20-5b31
author cvs
date Mon, 13 Aug 2007 10:25:37 +0200
parents 41f2f0e326e9
children 966663fcf606
comparison
equal deleted inserted replaced
264:682d2a9d41a5 265:8efd647ea9ca
87 ;; Then process the autoloads 87 ;; Then process the autoloads
88 (setq autoload-file-name "auto-autoloads.elc") 88 (setq autoload-file-name "auto-autoloads.elc")
89 (setq source-directory (concat default-directory "../lisp")) 89 (setq source-directory (concat default-directory "../lisp"))
90 ;; (print (concat "Source directory: " source-directory)) 90 ;; (print (concat "Source directory: " source-directory))
91 (load "packages.el") 91 (load "packages.el")
92 ;; (load "setup-paths.el")
92 93
93 (let (preloaded-file-list) 94 (let (preloaded-file-list)
94 (load (concat default-directory "../lisp/dumped-lisp.el")) 95 (load (concat default-directory "../lisp/dumped-lisp.el"))
95 ;; Add package lisp directories to load-path (for autoloads) 96 ;; Add package lisp directories to load-path (for autoloads)
96 ;; Add files dumped from lisp packages 97 ;; Add files dumped from lisp packages
98 ;(paths-setup-paths)
97 (packages-find-packages package-path t t) 99 (packages-find-packages package-path t t)
98 (setq preloaded-file-list 100 (setq preloaded-file-list
99 (append preloaded-file-list packages-hardcoded-lisp)) 101 (append preloaded-file-list packages-hardcoded-lisp))
100 (while preloaded-file-list 102 (while preloaded-file-list
101 (let ((arg0 (packages-add-suffix (car preloaded-file-list))) 103 (let ((arg0 (packages-add-suffix (car preloaded-file-list)))