[Emacs-diffs] emacs/lisp ChangeLog emacs-lisp/authors.el

[Glenn Morris]

CVSROOT:        /sources/emacs
Module name:    emacs
Changes by:     Glenn Morris <gm>       09/01/21 03:54:32

Modified files:
        lisp           : ChangeLog 
        lisp/emacs-lisp: authors.el 

Log message:
        (authors-aliases): Remove some "ignore" entries that are no longer 
needed.
        (authors-scan-change-log): Doc fix.
        (authors-scan-el): Restore let*, foolishly removed 2009-01-11.

CVSWeb URLs:
http://cvs.savannah.gnu.org/viewcvs/emacs/lisp/ChangeLog?cvsroot=emacs&r1=1.15136&r2=1.15137
http://cvs.savannah.gnu.org/viewcvs/emacs/lisp/emacs-lisp/authors.el?cvsroot=emacs&r1=1.60&r2=1.61

Patches:
Index: ChangeLog
===================================================================
RCS file: /sources/emacs/emacs/lisp/ChangeLog,v
retrieving revision 1.15136
retrieving revision 1.15137
diff -u -b -r1.15136 -r1.15137
--- ChangeLog   20 Jan 2009 11:34:39 -0000      1.15136
+++ ChangeLog   21 Jan 2009 03:54:29 -0000      1.15137
@@ -1,3 +1,10 @@
+2009-01-21  Glenn Morris  <address@hidden>
+
+       * emacs-lisp/authors.el (authors-aliases): Remove some "ignore" entries
+       that are no longer needed.
+       (authors-scan-change-log): Doc fix.
+       (authors-scan-el): Restore let*, foolishly removed 2009-01-11.
+
 2009-01-20  Agustín Martín  <address@hidden>
 
        * textmodes/ispell.el (ispell-find-aspell-dictionaries): Use

Index: emacs-lisp/authors.el
===================================================================
RCS file: /sources/emacs/emacs/lisp/emacs-lisp/authors.el,v
retrieving revision 1.60
retrieving revision 1.61
diff -u -b -r1.60 -r1.61
--- emacs-lisp/authors.el       20 Jan 2009 00:53:06 -0000      1.60
+++ emacs-lisp/authors.el       21 Jan 2009 03:54:32 -0000      1.61
@@ -76,11 +76,15 @@
     ("Gerd Möllmann" "Gerd Moellmann")
     ("Hallvard B. Furuseth" "Hallvard B Furuseth" "Hallvard Furuseth")
     ("Hrvoje Nikšić" "Hrvoje Niksic")
-    (nil "(address@hidden)")
+    ;; src/ChangeLog.4, 1994-01-11, since fixed.
+;;;    (nil "(address@hidden)")
+    ;; lisp/gnus/ChangeLog.1, 1998-01-15.
+    ;; http://quimby.gnus.org/cgi-bin/cvsweb.cgi/gnus/lisp/gnus-art.el?rev=4.13
     (nil "<address@hidden>")
-    (nil "Code Extracted")
-    (nil "\\`FSF")
-    (nil "ISO-2022-JP")
+    (nil "Code Extracted") ; lisp/newcomment.el's "Author:" header
+    (nil "\\`FSF")  ; FIXME what is this for - no effect?
+    ;; lisp/gnus/ChangeLog.1, 1997-10-12, since fixed.
+;;;    (nil "ISO-2022-JP")
     ("Jaeyoun Chung" "Jae-youn Chung" "Jae-you Chung" "Chung Jae-youn")
     ("Jan Djärv" "Jan D." "Jan Djarv")
     ("Jay K. Adams" "address@hidden" "Jay Adams")
@@ -691,12 +695,13 @@
 Keys of TABLE are author names.  Values are alists of entries (FILE
 \(ACTION . COUNT) ...).  FILE is one file the author worked on.  The
 rest of the entry is a list of keyword symbols describing what he did
-with the file and the number of each action.
+with the file and the number of each action:
 
 :wrote         means the author wrote the file
+:cowrote       means he wrote the file in collaboration with others
 :changed       means he changed the file COUNT times."
 
-  (let* ((enable-local-variables :safe)
+  (let* ((enable-local-variables :safe)        ; for find-file, hence let*
         (enable-local-eval nil)
         (existing-buffer (get-file-buffer log-file))
         (buffer (find-file-noselect log-file))
@@ -748,8 +753,8 @@
 (defun authors-scan-el (file table)
   "Scan Lisp file FILE for author information.
 TABLE is a hash table to add author information to."
-  (let ((existing-buffer (get-file-buffer file))
-       (enable-local-variables :safe)
+  (let* ((existing-buffer (get-file-buffer file))
+        (enable-local-variables :safe) ; for find-file, hence let*
        (enable-local-eval nil)
        (buffer (find-file-noselect file)))
     (setq file (file-name-nondirectory file))