(authors-add): Don't add an entry if

[bpt/emacs.git] / lisp / emacs-lisp / authors.el

diff --git a/lisp/emacs-lisp/authors.el b/lisp/emacs-lisp/authors.el
index 0f2c2d2..2530e9e 100644 (file)
--- a/lisp/emacs-lisp/authors.el
+++ b/lisp/emacs-lisp/authors.el
@@ -113,7 +113,8 @@ from `authors-obsolete-files-regexps'."
 ACTION is a keyword symbol describing what he did.  Record file,
 author and what he did in hash table TABLE.  See the description of
 `authors-scan-change-log' for the structure of the hash table."
-  (unless (authors-obsolete-file-p file)
+  (unless (or (authors-obsolete-file-p file)
+             (equal author ""))
     (let* ((value (gethash author table))
           (entry (assoc file value)))
       (if (null entry)