summaryrefslogtreecommitdiff
path: root/admin/authors.el
diff options
context:
space:
mode:
authorGlenn Morris <rgm@gnu.org>2017-10-23 22:04:01 -0700
committerGlenn Morris <rgm@gnu.org>2017-10-23 22:04:01 -0700
commitb51009d7f02b796bcdf9b0893bc4ad348460e844 (patch)
treeb6d354c34fcfd6d9c4650ba80f7cb0172d8248e7 /admin/authors.el
parenta015db90e345f70801781e710bb8d12e89bb048b (diff)
downloademacs-b51009d7f02b796bcdf9b0893bc4ad348460e844.tar.gz
* admin/authors.el (authors-canonical-author-name):
Ignore name issues in "lax" ChangeLogs.
Diffstat (limited to 'admin/authors.el')
-rw-r--r--admin/authors.el7
1 files changed, 4 insertions, 3 deletions
diff --git a/admin/authors.el b/admin/authors.el
index 16e62610bad..045527644a3 100644
--- a/admin/authors.el
+++ b/admin/authors.el
@@ -1353,9 +1353,10 @@ it is found in `authors-fixed-case'."
(setq author (replace-regexp-in-string "[ \t]+" " " author))
;; NB this ignores the first name only case.
(unless (string-match "[-, \t]" author)
- (push (format-message "%s:%d: ignored `%s'"
- file (1+ (count-lines (point-min) pos)) author)
- authors-ignored-names)
+ (or (authors-lax-changelog-p file)
+ (push (format-message "%s:%d: ignored `%s'"
+ file (1+ (count-lines (point-min) pos)) author)
+ authors-ignored-names))
(setq author ""))
(or (car (member author authors-fixed-case))
(capitalize author))))