Browse files

Prefix arg allows regen-autoloads to force even if "up to date".

  • Loading branch information...
technomancy committed Dec 9, 2008
1 parent cc5b4ee commit 2304babf7b6908bdaa46ee6eb0666b04bb248ac6
Showing with 5 additions and 3 deletions.
  1. +5 −3 starter-kit-defuns.el
@@ -107,12 +107,14 @@
(byte-recompile-directory (expand-file-name "~/.emacs.d") 0))
-(defun regen-autoloads ()
+(defun regen-autoloads (&optional force-regen)
"Regenerate the autoload definitions file if necessary and load it."
- (interactive)
+ (interactive "p")
+ (setq reg force-regen)
(let ((autoload-dir (concat dotfiles-dir "/elpa-to-submit"))
(generated-autoload-file autoload-file))
- (when (or (not (file-exists-p autoload-file))
+ (when (or (> force-regen 1) ;; prefix arg used
+ (not (file-exists-p autoload-file))
(some (lambda (f) (file-newer-than-file-p f autoload-file))
(directory-files autoload-dir t "\\.el$")))
(message "Updating autoloads...")

0 comments on commit 2304bab

Please sign in to comment.