diff options
| author | Glenn Morris | 2017-10-23 22:04:01 -0700 |
|---|---|---|
| committer | Glenn Morris | 2017-10-23 22:04:01 -0700 |
| commit | b51009d7f02b796bcdf9b0893bc4ad348460e844 (patch) | |
| tree | b6d354c34fcfd6d9c4650ba80f7cb0172d8248e7 /admin | |
| parent | a015db90e345f70801781e710bb8d12e89bb048b (diff) | |
| download | emacs-b51009d7f02b796bcdf9b0893bc4ad348460e844.tar.gz emacs-b51009d7f02b796bcdf9b0893bc4ad348460e844.zip | |
* admin/authors.el (authors-canonical-author-name):
Ignore name issues in "lax" ChangeLogs.
Diffstat (limited to 'admin')
| -rw-r--r-- | admin/authors.el | 7 |
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'." | |||
| 1353 | (setq author (replace-regexp-in-string "[ \t]+" " " author)) | 1353 | (setq author (replace-regexp-in-string "[ \t]+" " " author)) |
| 1354 | ;; NB this ignores the first name only case. | 1354 | ;; NB this ignores the first name only case. |
| 1355 | (unless (string-match "[-, \t]" author) | 1355 | (unless (string-match "[-, \t]" author) |
| 1356 | (push (format-message "%s:%d: ignored `%s'" | 1356 | (or (authors-lax-changelog-p file) |
| 1357 | file (1+ (count-lines (point-min) pos)) author) | 1357 | (push (format-message "%s:%d: ignored `%s'" |
| 1358 | authors-ignored-names) | 1358 | file (1+ (count-lines (point-min) pos)) author) |
| 1359 | authors-ignored-names)) | ||
| 1359 | (setq author "")) | 1360 | (setq author "")) |
| 1360 | (or (car (member author authors-fixed-case)) | 1361 | (or (car (member author authors-fixed-case)) |
| 1361 | (capitalize author)))) | 1362 | (capitalize author)))) |