(princ (format "Wrote %s\n"
(expand-file-name "custom-load.elc" dir))))
(t
- (setq autoload-package-name package)
- (add-to-list 'command-line-args-left dir)
- (batch-update-directory)
+ (if (fboundp 'batch-update-directory-autoloads)
+ (progn
+ (setq command-line-args-left
+ (cons package (cons dir command-line-args-left)))
+ (batch-update-directory-autoloads))
+ (setq autoload-package-name package)
+ (add-to-list 'command-line-args-left dir)
+ (batch-update-directory))
(add-to-list 'command-line-args-left dir)
(Custom-make-dependencies)