Update generate-autoloads script: new path convention

This commit is contained in:
Henrik Lissner 2016-03-26 01:21:29 -04:00
parent 8a0edfc4cd
commit 05868a88d5

View file

@ -1,11 +1,11 @@
#!emacs --script #!emacs --script
(load (concat user-emacs-directory "bootstrap.el")) (load (concat user-emacs-directory "bootstrap.el"))
(let ((generated-autoload-file (concat narf-core-dir "autoloads.el"))) (let ((generated-autoload-file (concat narf-core-dir "/autoloads.el")))
(when (file-exists-p generated-autoload-file) (when (file-exists-p generated-autoload-file)
(delete-file generated-autoload-file)) (delete-file generated-autoload-file))
(mapc (lambda (dir) (mapc (lambda (dir)
(update-directory-autoloads (concat dir "defuns")) (update-directory-autoloads (concat dir "/defuns"))
(message "Scanned: %s" dir)) (message "Scanned: %s" dir))
(list narf-core-dir narf-modules-dir)) (list narf-core-dir narf-modules-dir))
(message "Done!")) (message "Done!"))