Mercurial > hg > xemacs-beta
comparison lisp/utils/autoload.el @ 193:f53b5ca2e663 r20-3b23
Import from CVS: tag r20-3b23
author | cvs |
---|---|
date | Mon, 13 Aug 2007 09:58:30 +0200 |
parents | 489f57a838ef |
children | a2f645c6b9f8 |
comparison
equal
deleted
inserted
replaced
192:9d35321dd38c | 193:f53b5ca2e663 |
---|---|
578 (update-autoloads-from-directory arg)) | 578 (update-autoloads-from-directory arg)) |
579 ((file-exists-p arg) | 579 ((file-exists-p arg) |
580 (update-file-autoloads arg)) | 580 (update-file-autoloads arg)) |
581 (t (error "No such file or directory: %s" arg)))) | 581 (t (error "No such file or directory: %s" arg)))) |
582 (when autoload-do-custom-save | 582 (when autoload-do-custom-save |
583 (autoload-save-customization)) | 583 (autoload-save-customization) |
584 (fixup-autoload-buffer (concat (file-name-nondirectory defdir) | 584 (clrhash customized-symbols)) |
585 (fixup-autoload-buffer (concat (if autoload-package-name | |
586 autoload-package-name | |
587 (file-name-nondirectory defdir)) | |
585 "-autoloads")) | 588 "-autoloads")) |
586 (save-some-buffers t) | 589 (save-some-buffers t) |
587 ;; (message "Done") | 590 ;; (message "Done") |
588 (kill-emacs 0))) | 591 (kill-emacs 0))) |
589 | 592 |