(authors-aliases): Addition.

(authors): Allow to use it for other projects.

2 files changed, 7 insertions, 2 deletions

diff --git a/lisp/ChangeLog b/lisp/ChangeLog
index 2522fd0a6ab..c47e85857f2 100644
--- a/lisp/ChangeLog
+++ b/lisp/ChangeLog
@@ -1,5 +1,8 @@
 2009-01-03  Reiner Steib  <Reiner.Steib@gmx.de>
 
+        * emacs-lisp/authors.el (authors-aliases): Addition.
+        (authors): Allow to use it for other projects.
+
         * emacs-lisp/copyright.el (copyright-update-directory): Autoload.
         Clarify MATCH argument.  Print filenames.
 
diff --git a/lisp/emacs-lisp/authors.el b/lisp/emacs-lisp/authors.el
index 8d0fee18707..448999992da 100644
--- a/lisp/emacs-lisp/authors.el
+++ b/lisp/emacs-lisp/authors.el
@@ -113,7 +113,7 @@ files.")
     ("Mikio Nakajima" "Nakajima Mikio")
     ("Paul Eggert" "eggert")
     ("Paul Reilly" "(pmr@legacy.pajato.com)")
-    ("Pavel Janík" "Pavel Janík Ml." "Pavel Janík" "Pavel@Janik.Cz")
+    ("Pavel Janík" "Pavel Janík Ml." "Pavel Janik Ml." "Pavel Janik" "Pavel Janík" "Pavel@Janik.Cz")
     ("Per Abrahamsen" "Per Abhiddenware")
     ("Peter S. Galbraith" "Peter Galbraith")
     ("Peter Runestig" "Peter 'luna' Runestig")
@@ -750,7 +750,9 @@ buffer *Authors Errors* containing references to unknown files."
         authors-invalid-file-names)
     (authors-add-fixed-entries table)
     (unless (file-exists-p (expand-file-name "src/emacs.c" root))
-      (error "Not the root directory of Emacs: %s" root))
+      (unless (y-or-n-p
+               (format "Not the root directory of Emacs: %s, continue? " root))
+        (error "Not the root directory.")))
     (dolist (log logs)
       (when (string-match "ChangeLog\\(.[0-9]+\\)?$" log)
         (message "Scanning %s..." log)