Mercurial > hg > xemacs-beta

comparison lisp/autoload.el @ 645:87900685187b

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
[xemacs-hg @ 2001-08-08 08:40:19 by didierv] autoload.el: make defdir a file name, not directory name.
author didierv
date Wed, 08 Aug 2001 08:40:19 +0000
parents 023b83f4e54b
children 00c54252fe4f
comparison
equal deleted inserted replaced
644:51494923758b 645:87900685187b
528 `generated-autoload-file' should be set to the name of the autoload 528 `generated-autoload-file' should be set to the name of the autoload
529 file into which the autoloads will be generated, and the autoloads 529 file into which the autoloads will be generated, and the autoloads
530 for all files and directories will go into that same file. 530 for all files and directories will go into that same file.
531 531
532 If FORCE is non-nil, always save out the autoload files even if unchanged." 532 If FORCE is non-nil, always save out the autoload files even if unchanged."
533 (let ((defdir default-directory) 533 (let ((defdir (directory-file-name default-directory))
534 (enable-local-eval nil)) ; Don't query in batch mode. 534 (enable-local-eval nil)) ; Don't query in batch mode.
535 ;; (message "Updating autoloads in %s..." generated-autoload-file) 535 ;; (message "Updating autoloads in %s..." generated-autoload-file)
536 (dolist (arg files-or-dirs) 536 (dolist (arg files-or-dirs)
537 (setq arg (expand-file-name arg defdir)) 537 (setq arg (expand-file-name arg defdir))
538 (let ((generated-autoload-file 538 (let ((generated-autoload-file