/[emacs]/emacs/lisp/emacs-lisp/authors.el
ViewVC logotype

Diff of /emacs/lisp/emacs-lisp/authors.el

Parent Directory Parent Directory | Revision Log Revision Log | View Patch Patch

revision 1.12.4.3 by miles, Fri Nov 21 00:36:07 2003 UTC revision 1.12.4.4 by miles, Thu Sep 16 00:12:21 2004 UTC
# Line 52  files.") Line 52  files.")
52      ("David Gillespie" "Dave Gillespie")      ("David Gillespie" "Dave Gillespie")
53      ("David K,Ae(Bgedal" "David K..edal")      ("David K,Ae(Bgedal" "David K..edal")
54      ("David M. Koppelman" "David M. Koppelman, Koppel@Ee.Lsu.Edu")      ("David M. Koppelman" "David M. Koppelman, Koppel@Ee.Lsu.Edu")
55      ("David M. Smith" "David Smith")      ("David M. Smith" "David Smith" "David M Smith")
56        ("Ed L. Cashin" "Ed L Cashin")
57      ("Edward M. Reingold" "Ed Reingold" "Edward M Reingold"      ("Edward M. Reingold" "Ed Reingold" "Edward M Reingold"
58       "Reingold Edward M")       "Reingold Edward M")
59      ("Eli Zaretskii" "eliz")      ("Eli Zaretskii" "eliz")
60    ;    ("Emilio C. Lopes" "Emilio Lopes")
61        ("Era Eriksson" "Era@Iki.Fi")
62      ("Eric M. Ludlam" "Eric Ludlam")      ("Eric M. Ludlam" "Eric Ludlam")
63      ("Eric S. Raymond" "Eric Raymond")      ("Eric S. Raymond" "Eric Raymond")
64      ("Eric Youngdale" "(Eric Youngdale at youngdale@v6550c.nrl.navy.mil)")      ("Eric Youngdale" "(Eric Youngdale at youngdale@v6550c.nrl.navy.mil)")
65        ("Francis J. Wright" "Dr Francis J. Wright" "Francis Wright")
66      ("Fran,Ag(Bois Pinard" "Francois Pinard")      ("Fran,Ag(Bois Pinard" "Francois Pinard")
67      ("Francesco Potort,Al(B" "Francesco Potorti" "Francesco Potorti`")      ("Francesco Potort,Al(B" "Francesco Potorti" "Francesco Potorti`")
68      ("Frederic Pierresteguy" "Fred Pierresteguy")      ("Frederic Pierresteguy" "Fred Pierresteguy")
69      ("Geoff Voelker" "voelker")      ("Geoff Voelker" "voelker")
70      ("Hallvard B. Furuseth" "Hallvard B Furuseth")      ("Hallvard B. Furuseth" "Hallvard B Furuseth")
71        ("Hrvoje Nik,B9(Bi,Bf(B" "Hrvoje Niksic")
72      (nil "(afs@hplb.hpl.hp.com)")      (nil "(afs@hplb.hpl.hp.com)")
73      (nil "<Use-Author-Address-Header@\\[127.1\\]>")      (nil "<Use-Author-Address-Header@\\[127.1\\]>")
74      (nil "Code Extracted")      (nil "Code Extracted")
# Line 71  files.") Line 76  files.")
76      (nil "ISO-2022-JP")      (nil "ISO-2022-JP")
77      ("Jaeyoun Chung" "Jae-youn Chung" "Jae-you Chung" "Chung Jae-youn")      ("Jaeyoun Chung" "Jae-youn Chung" "Jae-you Chung" "Chung Jae-youn")
78      ("Jan Dj,Ad(Brv" "Jan D." "Jan Djarv")      ("Jan Dj,Ad(Brv" "Jan D." "Jan Djarv")
79      ("Jay K. Adams" "jka@ece.cmu.edu")      ("Jay K. Adams" "jka@ece.cmu.edu" "Jay Adams")
80      ("Jay R. Adams" "Jay Adams")      ("J,Ai(Br,At(Bme Marant" "J,bi(Br,bt(Bme Marant" "Jerome Marant")
81      ("Jens-Ulrik Holger Petersen" "Jens-Ulrik Petersen")      ("Jens-Ulrik Holger Petersen" "Jens-Ulrik Petersen")
82      ("Jonathan I. Kamens" "Jonathan Kamens")      ("Jonathan I. Kamens" "Jonathan Kamens")
83      ("Joseph Arceneaux" "Joe Arceneaux")      ("Joseph Arceneaux" "Joe Arceneaux")
84      ("K. Shane Hartman" "Shane Hartman")      ("K. Shane Hartman" "Shane Hartman")
85      ("Kai Gro,A_(Bjohann" "Kai Grossjohann" "Kai Gro,b_(Bjohann"      ("Kai Gro,A_(Bjohann" "Kai Grossjohann" "Kai Gro,b_(Bjohann"
86       "Kai.Grossjohann@Cs.Uni-Dortmund.De")       "Kai.Grossjohann@Cs.Uni-Dortmund.De"
87         "Kai.Grossjohann@Gmx.Net")
88      ("Karl Berry" "K. Berry")      ("Karl Berry" "K. Berry")
89        ("Kazushi Marukawa" "Kazushi")
90      ("Ken Manheimer" "Kenneth Manheimer")      ("Ken Manheimer" "Kenneth Manheimer")
91      ("Kenichi Handa" "Ken'ichi Handa" "Kenichi HANDA")      ("Kenichi Handa" "Ken'ichi Handa" "Kenichi HANDA")
92      ("Kim F. Storm" "Kim Storm")      ("Kim F. Storm" "Kim Storm")
93        ("Kyle Jones" "Kyle E. Jones")
94      ("Marcus G. Daniels" "Marcus Daniels")      ("Marcus G. Daniels" "Marcus Daniels")
95        ("Mark D. Baushke" "Mark D Baushke")
96        ("Martin Lorentzon" "Martin Lorentzson")
97        ("Matt Swift" "Matthew Swift")
98      ("Michael D. Ernst" "Michael Ernst")      ("Michael D. Ernst" "Michael Ernst")
99      ("Michael I. Bushnell" "Michael I Bushnell" "Michael I. Bushnell, P/Bsg")      ("Michael I. Bushnell" "Michael I Bushnell" "Michael I. Bushnell, P/Bsg")
100      ("Paul Eggert" "eggert")      ("Paul Eggert" "eggert")
101      ("Paul Reilly" "(pmr@legacy.pajato.com)")      ("Paul Reilly" "(pmr@legacy.pajato.com)")
102      ("Pavel Jan,Bm(Bk" "Pavel Jan,Am(Bk Ml.")      ("Pavel Jan,Bm(Bk" "Pavel Jan,Am(Bk Ml." "Pavel Jan,Am(Bk" "Pavel@Janik.Cz")
103      ("Per Abrahamsen" "Per Abhiddenware")      ("Per Abrahamsen" "Per Abhiddenware")
104        ("Peter S. Galbraith" "Peter Galbraith")
105        ("Peter Runestig" "Peter 'luna' Runestig")
106      ("Peter S. Galbraith" "Peter S Galbraith")      ("Peter S. Galbraith" "Peter S Galbraith")
107      ("Richard M. Stallman" "Richard M. Stallman,,," "Richard Stallman"      ("Richard M. Stallman" "Richard M. Stallman,,," "Richard Stallman"
108       "rms" "rms@gnu.org")       "rms" "rms@gnu.org")
# Line 97  files.") Line 110  files.")
110      ("Roland B. Roberts" "Roland B Roberts" "Roland Roberts")      ("Roland B. Roberts" "Roland B Roberts" "Roland Roberts")
111      ("Rui-Tao Dong" "Rui-Tao Dong ~{6-Hpln~}")      ("Rui-Tao Dong" "Rui-Tao Dong ~{6-Hpln~}")
112      ("Sam Steingold" "Sam Shteingold")      ("Sam Steingold" "Sam Shteingold")
113        ("Stefan Monnier" "Stefan")
114      ("Stephen A. Wood" "(saw@cebaf.gov)")      ("Stephen A. Wood" "(saw@cebaf.gov)")
115      ("Steven L. Baur" "SL Baur" "Steven L Baur")      ("Steven L. Baur" "SL Baur" "Steven L Baur")
116      ("Takaaki Ota" "Tak Ota")      ("Takaaki Ota" "Tak Ota")
117        ("Teodor Zlatanov" "Ted Zlatanov")
118      ("Torbj,Av(Brn Axelsson" "Torbjvrn Axelsson")      ("Torbj,Av(Brn Axelsson" "Torbjvrn Axelsson")
119      ("Torbj,Av(Brn Einarsson" "Torbj.*rn Einarsson")      ("Torbj,Av(Brn Einarsson" "Torbj.*rn Einarsson")
120      ("Toru Tomabechi" "Toru Tomabechi,")      ("Toru Tomabechi" "Toru Tomabechi,")
# Line 207  listed.") Line 222  listed.")
222      ("Frederic Pierresteguy" :wrote "widget.c")      ("Frederic Pierresteguy" :wrote "widget.c")
223      ("Michael D. Prange" :changed "tex-mode.el")      ("Michael D. Prange" :changed "tex-mode.el")
224      ("Paul Reilly" :wrote "gux5-4r2.h" "dgux5-4r3.h")      ("Paul Reilly" :wrote "gux5-4r2.h" "dgux5-4r3.h")
225      ("Roland B Roberts" :changed "files.el" "sort.el" "vmsproc.el"      ("Roland B. Roberts" :changed "files.el" "sort.el" "vmsproc.el"
226       "buffer.h" "callproc.c" "dired.c" "process.c" "sysdep.c" "systty.h"       "buffer.h" "callproc.c" "dired.c" "process.c" "sysdep.c" "systty.h"
227       "vmspaths.h" "build.com" "compile.com" "kepteditor.com" "precomp.com"       "vmspaths.h" "build.com" "compile.com" "kepteditor.com" "precomp.com"
228       :wrote "logout.com" "mailemacs.com")       :wrote "logout.com" "mailemacs.com")
# Line 405  words in the author's name." Line 420  words in the author's name."
420            (setq regexps (cdr regexps))))))            (setq regexps (cdr regexps))))))
421    (when author    (when author
422      (setq author (replace-regexp-in-string "[ \t]*[(<].*$" "" author))      (setq author (replace-regexp-in-string "[ \t]*[(<].*$" "" author))
423      (setq author (replace-regexp-in-string "^[ \t]+" "" author))      (setq author (replace-regexp-in-string "\`[ \t]+" "" author))
424      (setq author (replace-regexp-in-string "[ \t]+$" "" author))      (setq author (replace-regexp-in-string "[ \t]+$" "" author))
425        (setq author (replace-regexp-in-string "[ \t]+" " " author))
426        (unless (string-match "[-, \t]" author)
427          (setq author ""))
428      (capitalize author)))      (capitalize author)))
429    
   
430  (defun authors-scan-change-log (log-file table)  (defun authors-scan-change-log (log-file table)
431    "Scan change log LOG-FILE for author information.    "Scan change log LOG-FILE for author information.
432    

Legend:
Removed from v.1.12.4.3  
changed lines
  Added in v.1.12.4.4

savannah-hackers-public@gnu.org
ViewVC Help
Powered by ViewVC 1.1.26