(finder-compile-keywords-make-dist):

Use the dirs specified on the command line.

diff --git a/lisp/finder.el b/lisp/finder.el
index 3d93cba..d86a18e 100644 (file)
--- a/lisp/finder.el
+++ b/lisp/finder.el
@@ -149,7 +149,8 @@ arguments compiles from `load-path'."
 
 (defun finder-compile-keywords-make-dist ()
   "Regenerate `finder-inf.el' for the Emacs distribution."
-  (finder-compile-keywords default-directory))
+  (apply 'finder-compile-keywords command-line-args-left)
+  (kill-emacs))
 
 ;;; Now the retrieval code