MMCT TEAM
Server IP : 111.118.215.189  /  Your IP : 3.133.106.74
Web Server : Apache
System : Linux md-in-83.webhostbox.net 4.19.286-203.ELK.el7.x86_64 #1 SMP Wed Jun 14 04:33:55 CDT 2023 x86_64
User : a1673wkz ( 2475)
PHP Version : 8.2.25
Disable Function : NONE
MySQL : OFF  |  cURL : ON  |  WGET : ON  |  Perl : ON  |  Python : ON
Directory (0755) :  /usr/share/emacs/24.3/lisp/emacs-lisp/

[  Home  ][  C0mmand  ][  Upload File  ]

Current File : //usr/share/emacs/24.3/lisp/emacs-lisp/authors.elc
;ELC
;;; Compiled by mockbuild@buildfarm06-new.corp.cloudlinux.com on Fri Oct 11 10:08:58 2024
;;; from file /builddir/build/BUILD/emacs-24.3/lisp/emacs-lisp/authors.el
;;; in Emacs version 24.3.1
;;; with all optimizations.

;;; This file contains utf-8 non-ASCII characters,
;;; and so cannot be loaded into Emacs 22 or earlier.
(and (boundp 'emacs-version)
     (< (aref emacs-version (1- (length emacs-version))) ?A)
     (string-lessp emacs-version "23")
     (error "`%s' was compiled for Emacs 23 or later" #$))

;;;;;;;;;;;;;;;;;;;;;;;;;;;;;


#@41 Coding system used in the AUTHORS file.
(defvar authors-coding-system 'utf-8 (#$ . 561))
#@208 Maximum number of files for which to print individual information.
If an author has modified more files, only the names of the most
frequently modified files are printed and a count of the additional
files.
(defconst authors-many-files 20 (#$ . 657))
#@186 Alist of author aliases.

Each entry is of the form (REALNAME REGEXP...).  If an author's name
matches one of the REGEXPs, use REALNAME instead.
If REALNAME is nil, ignore that author.
(defconst authors-aliases '(("Aaron S. Hawley" "Aaron Hawley") ("Alexandru Harsanyi" "Alex Harsanyi") ("Andrew Csillag" "Drew Csillag") ("Anna M. Bigatti" "Anna Bigatti") ("Barry A. Warsaw" "Barry A. Warsaw, Century Computing, Inc." "Barry A. Warsaw, ITB" "Barry Warsaw") ("Bill Carpenter" "WJ Carpenter") ("Bill Mann" "William F. Mann") ("Bill Rozas" "Guillermo J. Rozas") ("Björn Torkelsson" "Bjorn Torkelsson") ("Brian Fox" "Brian J. Fox") ("Brian Sniffen" "Brian T. Sniffen") ("Christoph Wedler" "Christoph.Wedler@sap.com") ("Daniel Pfeiffer" "<Daniel.Pfeiffer@Informatik.START.db.de>" "<Daniel.Pfeiffer@Informatik.START.dbp.de>") ("David Abrahams" "Dave Abrahams") ("David De La Harpe Golden" "David Golden") ("David Gillespie" "Dave Gillespie") ("David Kågedal" "David K..edal") ("David M. Koppelman" "David M. Koppelman, Koppel@Ec?e.Lsu.Edu" "David Koppelman") ("David M. Smith" "David Smith" "David M Smith") ("David O'Toole" "David T. O'Toole") ("Deepak Goel" "D. Goel") ("Ed L. Cashin" "Ed L Cashin") ("Edward M. Reingold" "Ed Reingold" "Edward M Reingold" "Reingold Edward M") ("Eli Zaretskii" "eliz") ("Emilio C. Lopes" "Emilio Lopes") ("Era Eriksson" "Era@Iki.Fi") ("Eric M. Ludlam" "Eric Ludlam") ("Eric S. Raymond" "Eric Raymond") ("Eric Youngdale" "(Eric Youngdale at youngdale@v6550c.nrl.navy.mil)") ("Francis J. Wright" "Dr Francis J. Wright" "Francis Wright") ("François Pinard" "Francois Pinard") ("Francesco Potortì" "Francesco Potorti" "Francesco Potorti`") ("Frederic Pierresteguy" "Fred Pierresteguy") ("Geoff Voelker" "voelker") ("Gerd Möllmann" "Gerd Moellmann") ("Hallvard B. Furuseth" "Hallvard B Furuseth" "Hallvard Furuseth") ("Hrvoje Nikšić" "Hrvoje Niksic") (nil "aaa bbb") (nil "<Use-Author-Address-Header@\\[127.1\\]>") (nil "Code Extracted") (nil "\\`FSF") ("Jaeyoun Chung" "Jae-youn Chung" "Jae-you Chung" "Chung Jae-youn") ("Jan Djärv" "Jan D." "Jan Djarv") ("Jay K. Adams" "jka@ece.cmu.edu" "Jay Adams") ("Jérôme Marant" "Jérôme Marant" "Jerome Marant") ("Jens-Ulrik Holger Petersen" "Jens-Ulrik Petersen") ("Jeremy Bertram Maitin-Shepard" "Jeremy Maitin-Shepard") ("Johan Bockgård" "Johan Bockgard") ("John J Foerch" "John Foerch") ("John W. Eaton" "John Eaton") ("Jonathan I. Kamens" "Jonathan Kamens") ("Joseph Arceneaux" "Joe Arceneaux") ("Joseph M. Kelsey" "Joe Kelsey") ("Juan León Lahoz García" "Juan-Leon Lahoz Garcia") ("K. Shane Hartman" "Shane Hartman") ("Kai Großjohann" "Kai Grossjohann" "Kai Großjohann" "Kai.Grossjohann@Cs.Uni-Dortmund.De" "Kai.Grossjohann@Gmx.Net") ("Karl Berry" "K. Berry") ("Károly Lőrentey" "Károly Lőrentey" "Lőrentey Károly") ("Kazushi Marukawa" "Kazushi") ("Ken Manheimer" "Kenneth Manheimer") ("Kenichi Handa" "Ken'ichi Handa" "Kenichi HANDA") ("Kevin Greiner" "Kevin J. Greiner") ("Kim F. Storm" "Kim Storm") ("Kyle Jones" "Kyle E. Jones") ("Lars Magne Ingebrigtsen" "Lars Ingebrigtsen") ("Marcus G. Daniels" "Marcus Daniels") ("Mark D. Baushke" "Mark D Baushke") ("Marko Kohtala" "Kohtala Marko") ("Agustín Martín" "Agustin Martin" "Agustín Martín Domingo") ("Martin Lorentzon" "Martin Lorentzson") ("Matt Swift" "Matthew Swift") ("Maxime Edouard Robert Froumentin" "Max Froumentin") ("Michael R. Mauger" "Michael Mauger") ("Michael D. Ernst" "Michael Ernst") ("Michaël Cadilhac" "Michael Cadilhac") ("Michael I. Bushnell" "Michael I Bushnell" "Michael I. Bushnell, P/Bsg") ("Michael R. Cook" "Michael Cook") ("Michael Sperber" "Michael Sperber \\[Mr. Preprocessor\\]") ("Mikio Nakajima" "Nakajima Mikio") ("Nelson Jose dos Santos Ferreira" "Nelson Ferreira") ("Noorul Islam" "Noorul Islam K M") ("Paul Eggert" "eggert") ("Paul Reilly" "(pmr@legacy.pajato.com)") ("Pavel Janík" "Pavel Janík Ml." "Pavel Janik Ml." "Pavel Janik" "Pavel Janík" "Pavel@Janik.Cz") ("Pavel Kobiakov" "Pavel Kobyakov") ("Per Abrahamsen" "Per Abhiddenware") ("Per Starbäck" "Per Starback") ("Peter J. Weisberg" "PJ Weisberg") ("Peter S. Galbraith" "Peter Galbraith") ("Peter Runestig" "Peter 'luna' Runestig") ("Peter S. Galbraith" "Peter S Galbraith") ("Raja R. Harinath" "Raja R Harinath") ("Richard G. Bielawski" "Richard G Bielawski" "Richard Bielawski") ("Richard King" "Dick King") ("Richard M. Stallman" "Richard M. Stallman,,," "Richard Stallman" "rms" "rms@gnu.org") ("Robert J. Chassell" "Bob Chassell") ("Roland B. Roberts" "Roland B Roberts" "Roland Roberts") ("Rui-Tao Dong" "Rui-Tao Dong ~{6-Hpln~}") ("Sacha Chua" "Sandra Jean Chua") ("Sam Steingold" "Sam Shteingold") ("Satyaki Das" "Indexed search by Satyaki Das") ("Sébastien Vauban" "Sebastien Vauban") ("Stephen A. Wood" "(saw@cebaf.gov)") ("Steven L. Baur" "SL Baur" "Steven L Baur") ("Stewart M. Clamen" "Stewart Clamen") ("Stuart D. Herring" "Stuart Herring" "Davis Herring") ("T.V. Raman" "T\\. V\\. Raman") ("Taichi Kawabata" "KAWABATA,? Taichi") ("Takaaki Ota" "Tak Ota") ("Takahashi Naoto" "Naoto Takahashi") ("Teodor Zlatanov" "Ted Zlatanov") ("Thomas Dye" "Tom Dye") ("Thomas Horsley" "Tom Horsley") ("Thomas Wurgler" "Tom Wurgler") ("Toby Cubitt" "Toby S\\. Cubitt") ("Tomohiko Morioka" "MORIOKA Tomohiko") ("Torbjörn Axelsson" "Torbjvrn Axelsson") ("Torbjörn Einarsson" "Torbj.*rn Einarsson") ("Toru Tomabechi" "Toru Tomabechi,") ("Tsugutomo Enami" "enami tsugutomo") ("Ulrich Müller" "Ulrich Mueller") ("Vincent Del Vecchio" "Vince Del Vecchio") ("William M. Perry" "Bill Perry") ("Wlodzimierz Bzyl" "W.*dek Bzyl") ("Yoni Rabkin" "Yoni Rabkin Katzenell") ("Yoshinori Koseki" "KOSEKI Yoshinori" "小関 吉則") ("Yutaka NIIBE" "NIIBE Yutaka")) (#$ . 915))
#@59 List of authors whose names cannot be simply capitalized.
(defconst authors-fixed-case '("Bryan O'Sullivan" "Christian von Roques" "Christophe de Dinechin" "Craig McDaniel" "David J. MacKenzie" "David McCabe" "David O'Toole" "Devon Sean McCullough" "Dominique de Waleffe" "Edward O'Connor" "Exal de Jesus Garcia Carrillo" "Greg McGary" "Hans de Graaff" "James TD Smith" "Joel N. Weber II" "Michael McNamara" "Mike McEwan" "Nelson Jose dos Santos Ferreira" "Peter von der Ahe" "Peter O'Gorman" "Piet van Oostrum" "Roland McGrath" "Sean O'Halpin" "Sean O'Rourke" "Tijs van Bakel") (#$ . 6636))
#@71 List of regexps matching files for which the FSF doesn't need papers.
(defvar authors-public-domain-files '("emerge\\.el" "vi\\.el" "feedmail\\.el" "mailpost\\.el" "hanoi\\.el" "meese\\.el" "studly\\.el" "modula2\\.el" "nnmaildir\\.el" "nnil\\.el" "b2m\\.c" "unexhp9k800\\.c" "emacsclient\\.1" "check-doc-strings") (#$ . 7234))
#@116 List of regexps matching obsolete files.
Changes to files matching one of the regexps in this list are not listed.
(defvar authors-obsolete-files-regexps '("vc-\\*\\.el$" "spec.txt$" ".*loaddefs.el$" "\\.\\(cvs\\|git\\)ignore$" "\\.arch-inventory$" "build-aux/" "m4/" "Emacs.xcodeproj" "charsets" "mapfiles" "preferences\\.\\(nib\\|gorm\\)" "vc-\\(rcs\\|cvs\\|sccs\\)-hooks\\.el$") (#$ . 7569))
#@88 List of files and directories to ignore.
Changes to files in this list are not listed.
(defconst authors-ignored-files '("external-lisp" "lock" "share-lib" "local-lisp" "noleim-Makefile.in" "NEWS" "ORDERS" "PROBLEMS" "FAQ" "AUTHORS" "FOR-RELEASE" "TODO" "todo" "MACHINES" "SERVICE" "README.unicode" "README.multi-tty" "TUTORIAL.translators" "NEWS.unicode" "COPYING.DJ" "Makefile.old" "Makefile.am" "NEWS.1" "OOOOONEWS...OONEWS" "OOOONEWS" "etc/NEWS" "NEWS.1-17" "NEWS.18" "NEWS.19" "NEWS.20" "NEWS.21" "NEWS.22" "MAINTAINERS" "MH-E-NEWS" "install-sh" "missing" "mkinstalldirs" "termcap.dat" "termcap.src" "termcap.ucb" "termcap" "ChangeLog.nextstep" "Emacs.clr" "spec.txt" "gfdl.1" "texi/Makefile.in" "Imakefile" "icons/sink.ico" "aixcc.lex" "nxml/char-name/unicode" "js2-mode.el" "cedet/tests/testtemplates.cpp" "cedet/tests/testusing.cpp" "cedet/tests/scopetest.cpp" "cedet/tests/scopetest.java" "cedet/tests/test.cpp" "cedet/tests/test.py" "cedet/tests/teststruct.cpp" "*.el" "cus-load.el" "finder-inf.el" "ldefs-boot.el" "compile" "config.guess" "config.sub" "depcomp" "images/icons/allout-widgets-dark-bg" "images/icons/allout-widgets-light-bg" "unidata/bidimirror.awk" "unidata/biditype.awk" "split-man" "Xkeymap.txt" "ms-7bkermit" "ulimit.hack" "gnu-hp300" "refcard.bit" "ledit.l" "forms.README" "forms-d2.dat" "CXTERM-DIC/PY.tit" "CXTERM-DIC/ZIRANMA.tit" "CXTERM-DIC/CTLau.tit" "CXTERM-DIC/CTLauB.tit" "NICKLES.WORTH" "INTERVAL.IDEAS" "RCP" "3B-MAXMEM" "AIX.DUMP" "SUN-SUPPORT" "XENIX" "CODINGS" "CHARSETS" "calc/INSTALL" "calc/Makefile" "vms-pp.trans" "_emacs" "batcomp.com" "notes/cpp" "emacsver.texi.in" "vpath.sed" "Cocoa/Emacs.base/Contents/Info.plist" "Cocoa/Emacs.base/Contents/Resources/English.lproj/InfoPlist.strings" "GNUstep/Emacs.base/Resources/Info-gnustep.plist" "GNUstep/Emacs.base/Resources/Emacs.desktop" "Cocoa/Emacs.base/Contents/Resources/English.lproj" "coccinelle/overlay.cocci" "coccinelle/symbol.cocci" "import-emacs" "release-utils" "ChangeLog.2001" "ChangeLog.2002" "ChangeLog.2003" "ChangeLog.2004" "ChangeLog.2005" "README.extras" "dir-template" "mkChangeLog" "MkChangeLog" "erc-auto.in" "CREDITS" "HACKING" "debian/changelog" "debian/control" "debian/copyright" "debian/maint/conffiles" "debian/maint/conffiles.in" "debian/maint/postinst" "debian/maint/postinst.in" "debian/maint/prerm" "debian/maint/prerm.in" "debian/README.Debian" "debian/README.erc-speak" "debian/rules" "debian/scripts/install" "debian/scripts/install.in" "debian/scripts/remove" "debian/scripts/remove.in" "debian/scripts/startup" "debian/scripts/startup.erc" "debian/scripts/startup.erc-speak") (#$ . 7970))
#@59 List of basenames occurring more than once in the source.
(defconst authors-ambiguous-files '("chart.el" "compile.el" "complete.el" "cpp.el" "ctxt.el" "custom.el" "cyrillic.el" "czech.el" "debug.el" "dired.el" "el.el" "eshell.el" "ethiopic.el" "f90.el" "files.el" "find.el" "format.el" "generic.el" "georgian.el" "greek.el" "grep.el" "hebrew.el" "imenu.el" "indian.el" "japanese.el" "java.el" "lao.el" "linux.el" "locate.el" "make.el" "mode.el" "python.el" "rmailmm.el" "semantic.el" "shell.el" "simple.el" "slovak.el" "sort.el" "speedbar.el" "srecode.el" "table.el" "texi.el" "thai.el" "tibetan.el" "util.el" "vc-bzr.el" "wisent.el") (#$ . 10596))
#@72 Actions taken from the original, manually (un)maintained AUTHORS file.
(defconst authors-fixed-entries '(("Richard M. Stallman" :wrote "[The original GNU Emacs and numerous files]") ("Joseph Arceneaux" :wrote "xrdb.c") ("Frank Bresz" :wrote "diff.el") ("David M. Brown" :wrote "array.el") ("Shawn M. Carey" :wrote "freebsd.h") ("Satyaki Das" :cowrote "mh-search.el") ("Eric Decker" :changed "hp800.h" "hpux10-20.h" "sysdep.c") ("Lawrence R. Dodd" :cowrote "dired-x.el") ("Paul Eggert" :wrote "rcs2log") ("Fred Fish" :changed "unexcoff.c") ("Keith Gabryelski" :wrote "hexl.c") ("Kevin Gallagher" :wrote "flow-ctrl.el") ("Howard Gayle" :wrote "casetab.c") ("Stephen Gildea" :wrote "refcard.tex" :cowrote "mh-funcs.el" "mh-search.el") ("David Gillespie" :wrote "cl.texi") ("Hewlett-Packard" :changed "emacsclient.c" "server.el" "keyboard.c") ("Indiana University Foundation" :changed "buffer.c" "buffer.h" "indent.c" "search.c" "xdisp.c" "region-cache.c" "region-cache.h") ("International Business Machines" :changed "emacs.c" "fileio.c" "process.c" "sysdep.c" "unexcoff.c") ("Michael K. Johnson" :changed "configure.ac" "emacs.c" "intel386.h" "mem-limits.h" "process.c" "template.h" "sysdep.c" "syssignal.h" "systty.h" "unexcoff.c" "linux.h") ("Henry Kautz" :wrote "bib-mode.el") ("Joseph M. Kelsey" :changed "fileio.c" "dir.h") ("Sam Kendall" :changed "etags.c" "etags.el") ("Richard King" :wrote "userlock.el" "filelock.c") ("Sebastian Kremer" :changed "add-log.el") ("Mark Lambert" :changed "process.c" "process.h") ("Aaron Larson" :changed "bibtex.el") ("James R. Larus" :cowrote "mh-e.el") ("Lars Lindberg" :changed "dabbrev.el" :cowrote "imenu.el") ("Lucid, Inc." :changed "bytecode.c" "byte-opt.el" "byte-run.el" "bytecomp.el" "delsel.el" "disass.el" "faces.el" "font-lock.el" "lmenu.el" "mailabbrev.el" "select.el" "xfaces.c" "xselect.c") ("Microelectronics and Computer Technology Corporation" :changed "etags.c" "emacsclient.c" "movemail.c" "rmail.el" "rmailedit.el" "rmailkwd.el" "rmailmsc.el" "rmailout.el" "rmailsum.el" "scribe.el" "server.el" "lisp.h" "sysdep.c" "unexcoff.c" "xmenu.c") ("Niall Mansfield" :changed "etags.c") ("Brian Marick" :cowrote "hideif.el") ("Marko Kohtala" :changed "info.el") ("Sidney Markowitz" :changed "doctor.el") ("Richard Mlynarik" :wrote "ehelp.el") ("Mosur Mohan" :changed "etags.c") ("Jeff Morgenthaler" :changed "flow-ctrl.el" "vt200.el" "vt201.el" "vt220.el" "vt240.el") ("Motorola" :changed "buff-menu.el") ("Hiroshi Nakano" :changed "ralloc.c") ("Mark Neale" :changed "fortran.el") ("Martin Neitzel" :changed "supercite.el") ("Andrew Oram" :changed "calendar.texi (and other files in man/)") ("Frederic Pierresteguy" :wrote "widget.c") ("Michael D. Prange" :changed "tex-mode.el") ("Roland B. Roberts" :changed "files.el" "sort.el" "buffer.h" "callproc.c" "dired.c" "process.c" "sysdep.c" "systty.h") ("Wolfgang Rupprecht" :changed "lisp-mode.el" "loadup.el" "sort.el" "alloc.c" "callint.c" "config.in" "ecrt0.c" "data.c" "fns.c" "lisp.h" "lread.c" "print.c" :wrote "float-sup.el" "floatfns.c") ("Schlumberger Technology Corporation" :changed "gud.el") ("Rainer Schoepf" :wrote "alpha.h" "unexalpha.c") ("William Sommerfeld" :wrote "emacsclient.c" "scribe.el") ("Leigh Stoller" :changed "emacsclient.c" "server.el") ("Steve Strassmann" :wrote "spook.el") ("Shinichirou Sugou" :changed "etags.c") ("Sun Microsystems, Inc" :changed "emacsclient.c" "server.el" :wrote "emacs.icon" "sun.el") ("Kayvan Sylvan" :changed "supercite.el") ("Spencer Thomas" :changed "emacsclient.c" "server.el" "dabbrev.el" "unexcoff.c" "gnus.texi") ("Jonathan Vail" :changed "vc.el") ("James Van Artsdalen" :changed "usg5-4.h" "unexcoff.c") ("Geoff Voelker" :wrote "w32-fns.el" "w32.c" "w32.h" "w32heap.c" "w32heap.h" "w32inevt.c" "w32proc.c" "w32term.c" "ms-w32.h") ("Morten Welinder" :wrote "dosfns.c" "[many MS-DOS files]" "msdos.h") ("Eli Zaretskii" :wrote "bidi.c" "[bidirectional display in xdisp.c]") ("Bill Wohler" :cowrote "mh-e.el") ("Garrett Wollman" :changed "sendmail.el") ("Dale R. Worley" :changed "mail-extr.el") ("Jamie Zawinski" :changed "bytecode.c" :wrote "tar-mode.el" :cowrote "disass.el")) (#$ . 11251))
#@89 File names which are valid, but no longer exist (or cannot be found)
in the repository.
(defconst authors-valid-file-names '("aclocal.m4" "build-ins.in" "Makefile.noleim" "makedist.bat" "makefile.def" "makefile.nt" "ns.mk" "debug.bat.in" "emacs.bat.in" ".gdbinit-union" "alloca.s" "make-delta" "config.w95" "emacstool.1" "align.umax" "cxux-crt0.s" "gould-sigvec.s" "getdate.y" "ymakefile" "permute-index" "index.perm" "ibmrs6000.inp" "b2m.c" "b2m.1" "b2m.pl" "rcs-checkin.1" "emacs.bash" "emacs.csh" "ms-kermit" "emacs.ico" "emacs21.ico" "emacs.py" "emacs2.py" "emacs3.py" "BABYL" "LPF" "LEDIT" "OTHER.EMACSES" "emacs16_mac.png" "emacs24_mac.png" "emacs256_mac.png" "emacs32_mac.png" "emacs48_mac.png" "emacs512_mac.png" "revdiff" "vcdiff" "rcs-checkin" "tindex.pl" "mainmake" "sed1.inp" "sed2.inp" "sed3.inp" "mac-fix-env.m" "temacs.opt" "descrip.mms" "compile.com" "link.com") (#$ . 15409))
#@97 Alist of files which have been renamed during their lifetime.
Elements are (OLDNAME . NEWNAME).
(defconst authors-renamed-files-alist '(("nt.c" . "w32.c") ("nt.h" . "w32.h") ("ntheap.c" . "w32heap.c") ("ntheap.h" . "w32heap.h") ("ntinevt.c" . "w32inevt.c") ("ntinevt.h" . "w32inevt.h") ("ntproc.c" . "w32proc.c") ("w32console.c" . "w32term.c") ("unexnt.c" . "unexw32.c") ("s/windowsnt.h" . "s/ms-w32.h") ("s/ms-w32.h" . "inc/ms-w32.h") ("winnt.el" . "w32-fns.el") ("emacs.manifest" . "emacs-x86.manifest") ("config.emacs" . "configure") ("configure.in" . "configure.ac") ("config.h.dist" . "config.in") ("config.h-dist" . "config.in") ("config.h.in" . "config.in") ("paths.h-dist" . "paths.h.in") ("patch1" . "sed1.inp") ("GETTING.GNU.SOFTWARE" . "FTP") ("etc/MACHINES" . "MACHINES") ("ONEWS" . "NEWS.19") ("ONEWS.1" . "NEWS.1-17") ("ONEWS.2" . "NEWS.1-17") ("ONEWS.3" . "NEWS.18") ("ONEWS.4" . "NEWS.18") ("ORDERS.USA" . "ORDERS") ("EUROPE" . "ORDERS") ("DIFF" . "OTHER.EMACSES") ("CCADIFF" . "OTHER.EMACSES") ("GOSDIFF" . "OTHER.EMACSES") ("Makefile.in.in" . "Makefile.in") ("leim-Makefile" . "leim/Makefile") ("leim-Makefile.in" . "leim/Makefile.in") ("emacs-lisp/testcover-ses.el" . "tcover-ses.el") ("emacs-lisp/testcover-unsafep.el" . "tcover-unsafep.el") ("mh-index.el" . "mh-search.el") ("mh-pick.el" . "mh-search.el") ("font-setting.el" . "dynamic-setting.el") ("INSTALL-CVS" . "INSTALL.BZR") ("INSTALL.CVS" . "INSTALL.BZR") ("refcards/fr-drdref.pdf" . "refcards/fr-dired-ref.pdf") ("gnus-logo.eps" . "refcards/gnus-logo.eps") ("build-install" . "build-ins.in") ("build-install.in" . "build-ins.in") ("unidata/Makefile" . "unidata/Makefile.in") ("move-if-change" . "build-aux/move-if-change") ("update-subdirs" . "build-aux/update-subdirs") ("trampver.texi.in" . "trampver.texi") ("e/eterm" . "e/eterm-color") ("e/eterm.ti" . "e/eterm-color.ti") ("README.txt" . "README") ("emacs.names" . "JOKES") ("ED.WORSHIP" . "JOKES") ("GNU.JOKES" . "JOKES") ("CHARACTERS" . "TODO") ("schema/xhtml-basic-form.rnc" . "schema/xhtml-bform.rnc") ("schema/xhtml-basic-table.rnc" . "schema/xhtml-btable.rnc") ("schema/xhtml-list.rnc" . "schema/xhtml-lst.rnc") ("schema/xhtml-target.rnc" . "schema/xhtml-tgt.rnc") ("schema/xhtml-style.rnc" . "schema/xhtml-xstyle.rnc") ("schema/docbook-dyntbl.rnc" . "schema/docbk-dyntbl.rnc") ("schema/docbook-soextbl.rnc" . "schema/docbk-soextbl.rn") ("texi/url.txi" . "url.texi") ("edt-user.doc" . "edt.texi") ("DEV-NOTES" . "nextstep") ("org/COPYRIGHT-AND-LICENSE" . "org/README") ("ctags.1" . "ctags.1") ("etags.1" . "etags.1") ("emacs.1" . "emacs.1") ("emacsclient.1" . "emacsclient.1") ("icons/emacs21.ico" . "emacs21.ico") ("nt/README.W32" . "README.W32")) (#$ . 16308))
#@232 List regexps and rewriting rules for renamed files.
Elements are (REGEXP . REPLACE).  If REPLACE is a string, the file
name matching REGEXP is replaced by REPLACE using `replace-string'.
Otherwise, the file name is accepted as is.
(defconst authors-renamed-files-regexps '(("^m/m-\\(.*\\.h\\)$" . "m/\\1") ("^m-\\(.*\\.h\\)$" . "\\1") ("^s/s-\\(.*\\.h\\)$" . "s/\\1") ("^s-\\(.*\\.h\\)$" . "\\1") ("^s/[-.a-zA-Z0-9_]+\\.h$" . t) ("\\(.*\\)\\.cmd$" . "\\1.bat") ("\\.bat$" . t) ("\\.[ch]$" . t) ("\\.el$" . t) ("\\.ps$" . t) ("\\.texi?$" . t) ("\\.texinfo$" . t) ("\\.xml?$" . t) ("\\.x[pb]m$" . t) ("\\.[xp]bm$" . t) ("^paths\\." . t) ("^install\\." . t) ("^\\(TUTORIAL[^/]*\\)" . "tutorials/\\1") ("^\\(tree-widget/\\(?:default\\|folder\\)/[-a-z]+\\.png\\)$" . "images/\\1") ("^\\(images/icons/\\)mac\\(emacs\\)_\\([0-9]+\\)\\(\\.png\\)" . "\\1\\2\\3_mac\\4") ("\\(images/icons/\\)emacs_\\([0-9][0-9]\\)\\.png" . "\\1hicolor/\\2x\\2/apps/emacs.png")) (#$ . 19017))
#@51 Convert FULLNAME to an unambiguous relative-name.
(defalias 'authors-disambiguate-file-name #[(fullname) "\304!\305\211\235\203&\304\306\307!!!\211\310\230\203\n\202'\311\312	\n#\202'\n*\207" [fullname parent relname authors-ambiguous-files file-name-nondirectory nil directory-file-name file-name-directory "lisp" format "%s/%s"] 5 (#$ . 19989)])
#@313 Return canonical file name for FILE found in LOG-FILE.
Checks whether FILE is a valid (existing) file name, has been renamed,
or is on the list of removed files.  Returns the non-directory part of
the file name.  Only uses the LOG-FILE position POS and associated AUTHOR
to print a message if FILE is not found.
(defalias 'authors-canonical-file-name #[(file log-file pos author) "\306\307	!\"\310\n\"\311\211\f\203\fA\202\307\312!\211\235\2049\313!\2049\313
!\2049\313\314
P!\203A\315\n!\202\214\310\"\211\203TA\202\214\211\203\213\316@@\"\203\202@A;\203|\312\317@A\320\311$!\202}
\311A\211\204\\)\nBB\204\305\235\204\305\321!\204\305\316\322\"\204\305\316\323\"\204\305\324\325	\326e\"T%B,\207" [file log-file fullname authors-checked-files-alist entry relname expand-file-name file-name-directory assoc nil file-name-nondirectory file-exists-p "etc/" authors-disambiguate-file-name string-match replace-match t authors-obsolete-file-p "[*]" "^[0-9.]+$" format "%s:%d: unrecognized `%s' for %s" count-lines valid authors-valid-file-names authors-renamed-files-alist authors-renamed-files-regexps rules authors-ignored-files pos author authors-invalid-file-names] 7 (#$ . 20355)])
#@52 Add actions from `authors-fixed-entries' to TABLE.
(defalias 'authors-add-fixed-entries #[(table) "\306\211\205>\n@\211@\306	A\306\211\2035\n@\2119\203&
\202.\307\f
$\210\nA\211\204,\nA\211\204\306*\207" [authors-fixed-entries entry --dolist-tail-- action author item nil authors-add table] 6 (#$ . 21629)])
#@149 Return non-nil if FILE is obsolete.
FILE is considered obsolete if it matches one of the regular expressions
from `authors-obsolete-files-regexps'.
(defalias 'authors-obsolete-file-p #[(file) "\304	\203\n\204\305	@\"	A\211\204\n*\207" [authors-obsolete-files-regexps regexps obsolete-p file nil string-match] 4 (#$ . 21967)])
#@232 Record that AUTHOR worked on FILE.
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.
(defalias 'authors-add #[(author file action table) "	\235\206\306!\206\n\307\232?\205P\310\n\"\311\f\"\312

\2043\313\n\314BD\fB#\202O\311
A\"\211
\203H
\211AT\241\202O
\314BC\244+\207" [file authors-ignored-files author table value entry authors-obsolete-file-p "" gethash assoc nil puthash 1 slot action] 5 (#$ . 22312)])
#@220 Return a canonicalized form of AUTHOR, an author name.
If AUTHOR has an entry in `authors-aliases', use that.  Remove
email addresses.  Capitalize words in the author's name, unless
it is found in `authors-fixed-case'.
(defalias 'authors-canonical-author-name #[(author) "\306\211	\2031	@@	@A	A\n\203\307\n@\f\"\203*\306\211\202\nA\211\202+\f\205a\310\311\312\f#\310\313\312\f#\310\314\312\f#\310\315\316\f#\307\317\f\"\204W\312\f
\235@\206a\320\f!\207" [authors-aliases aliases regexps realname author authors-fixed-case nil string-match replace-regexp-in-string "[ 	]*[(<].*$" "" "`[ 	]+" "[ 	]+$" "[ 	]+" " " "[-, 	]" capitalize] 5 (#$ . 22901)])
#@560 Scan change log LOG-FILE for author information.

For each change mentioned in the log, add an entry to hash table TABLE
under the author's canonical name.

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:

: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.
(defalias 'authors-scan-change-log #[(log-file table) "\306\307\310\n!\311\n!\307\211%r\fq\210\214~\210eb\210\312\313\307\314#\203\357\315 \210`%\316\317!\203K\307\320\307w\210\316\321!\204\322\323`\324 \"!
B\325y\210\2021\316\326!\203\323\327\225\324 \"&\330\331&\"\204z\325y\203z\316\332!\204z&\323\333 \324 \"P&\202Y\330\331&\"\203\350&\327\211\224O&\334\335\336&#&\334\337\336&#&\340&!\307'\211(\203\347(@'\341'\n%
@$\211'\203\336
\307)\211(\203\335(@)\342)'\343*$\210(A\211(\204\305*(A\211(\204\247*\325y\210)\202*?\205\370\344\f!.\207" [enable-local-variables enable-local-eval log-file existing-buffer buffer authors :safe nil get-file-buffer find-file-noselect re-search-forward "^[0-9]\\|^[ 	]+\\* " t beginning-of-line looking-at "^[0-9]+-[0-9]+-[0-9]+" " 	+:0-9-" "\\($\\|\\*\\|Suggested\\|Trivial\\|Version\\|Originally\\|From:\\|Patch[ 	]+[Bb]y\\)" authors-canonical-author-name buffer-substring-no-properties line-end-position 1 "^[ 	]+\\*" 0 string-match ":" ":\\|^[ 	]*$" line-beginning-position replace-regexp-in-string "[[(<{].*$" "" "," split-string authors-canonical-file-name authors-add :changed kill-buffer pos line file --dolist-tail-- author table] 6 (#$ . 23586)])
#@97 Scan Lisp file FILE for author information.
TABLE is a hash table to add author information to.
(defalias 'authors-scan-el #[(file table) "\306!\307\310\311!\312\313!!r\fq\210\214~\210eb\210\314\315\310\316#\203w\317\320!\321\235\204w\316\322\310 \211!\203d\323\310w\210\324\325`\326 \"!
B\327\320y!\205^\330\331!\205^\332\225Sb\205^\330\333!?\211!\2048
G\320V\203n\334 \335\336
\"\210+\202*	?\205\200\337\f!,\207" [file existing-buffer enable-local-variables enable-local-eval buffer authors get-file-buffer :safe nil find-file-noselect authors-disambiguate-file-name expand-file-name re-search-forward "^;+[ 	]*\\(Authors?\\|Commentary\\|Code\\):[ 	]*" t match-string 1 ("Commentary" "Code") :wrote "-0-9 	" authors-canonical-author-name buffer-substring-no-properties line-end-position zerop looking-at ";;;?\\(	+ *\\|  +\\)[[:alnum:]]" 0 "[[:upper:]][-[:alpha:]]+:[ 	]" :cowrote mapc #[(author) "\304	\n$\207" [author file action table authors-add] 5] kill-buffer action continue] 5 (#$ . 25403)])
#@59 Return t if FILE is a file that was put in public domain.
(defalias 'authors-public-domain-p #[(file) "\304	\203\n\204\305	@\"\203\306	A\211\204\n*\207" [authors-public-domain-files list public-domain-p file nil string-match t] 4 (#$ . 26438)])
#@359 Insert information about AUTHOR's work on Emacs into `authors-author-list'.
CHANGES is an alist of entries (FILE (ACTION . COUNT) ...), as produced by
`authors-scan-change-log'.
The element added to `authors-author-list' is (AUTHOR WROTE CO-WROTE CHANGED),
where WROTE, CO-WROTE, and CHANGED are lists of the files written, co-written
and changed by AUTHOR.
(defalias 'authors-add-to-author-list #[(author changes) "\205\260\306\307\211\211
\307\211\203i@\211A@\310!\2032\311P\2024\312\236\203EB\202_\313\236\203T\nB\202_\314\236AB	B+A\211\204*\203s\315\316\"\n\203|\315\n\316\"	\203\215\315	\317\"\211G\320\321	\"\fZ\322V\203\244	\233\323\324\fZ\"C\241\210\n	FB\211,\207" [author changed-list cowrote-list wrote-list nchanged changes 0 nil authors-public-domain-p " (public domain)" :wrote :cowrote :changed sort string-lessp #[(a b) "A	AU\203@	@\231\207A	AV\207" [a b] 2] mapcar car 2 format "and %d other files" change --dolist-tail-- actions file filestat authors-many-files authors-author-list] 6 (#$ . 26704)])
#@320 Extract author information from change logs and Lisp source files.
ROOT is the root directory under which to find the files.  If called
interactively, ROOT is read from the minibuffer.
Result is a buffer *Authors* containing authorship information, and a
buffer *Authors Errors* containing references to unknown files.
(defalias 'authors #[(root) "\306!\307	\310\311$\312\313\314\"\315\316\211?\317
!\210\320\306\321\"!\2041\322\323\324\"!\2041\325\326!\210?\316@\211A\203^A@@\327\330@\"\203U\331\332@\"\210\333@
\"\210AA\211A\204<*\307	\310\334$\211B\316C\211A\203\213A@C\331\332C\"\210\335C
\"\210AA\211A\204q+\331\336\f\"\210\337\f!q\210\340 \210\341D!\210\342c\210\316\211EF\343\344
\"\210\345F\346\"\211F\316E\211A\203\251A@\211E@EA@\347E8\350E8\316CGHIJ\351J\352\261\210I\203\353c\210I\316C\211A\203A@CiCG\\\354V\203\355c\210\356C\261\210AA\211A\204\365*\351c\210H\203ZI\203'\357c\210\360c\210H\316C\211A\203VA@CiCG\\\354V\203G\355c\210\356C\261\210AA\211A\2045*\351c\210G\203\237I\204iH\203l\357c\210\361c\210G\316C\211A\203\233A@CiCG\\\354V\203\214\355c\210\356C\261\210AA\211A\204z*\351c\210-AA\211A\204\275,\362\363\364D!\365\261\210\331\366\f\"\210K?\205\357\n\203\354r\337\367!q\210\316L\340 \210\341D!\210\370c\210\371\372\345\n\373\"\"\210eb\210\374 \210\331\375\304 \"\210)\376\f!-\207" [root find-program authors-invalid-file-names authors-checked-files-alist buffer-name table expand-file-name process-lines "-name" "ChangeLog*" make-hash-table :test equal "*Authors*" nil authors-add-fixed-entries file-exists-p "src/emacs.c" y-or-n-p format "Not the root directory of Emacs: %s, continue? " error "Not the root directory" string-match "ChangeLog\\(.[0-9]+\\)?$" message "Scanning %s..." authors-scan-change-log "*.el" authors-scan-el "Generating buffer %s..." get-buffer-create erase-buffer set-buffer-file-coding-system "Many people have contributed code included in the Free Software\nFoundation's distribution of GNU Emacs.  To show our appreciation for\ntheir public spirit, we list here in alphabetical order a condensed\nlist of their contributions.\n" maphash authors-add-to-author-list sort #[(a b) "@	@\231\207" [a b] 2] 2 3 "\n" ": " "wrote" 72 "\n " " " "and " "co-wrote" "changed" "\nLocal" " Variables:\ncoding: " symbol-name "\nEnd:\n" "Generating buffer %s... done" "*Authors Errors*" "Unrecognized file entries found:\n\n" mapc #[(f) "\301\302\"?\205\f\303\261\207" [f string-match "^[A-Za-z]+$" "\n"] 3] string-lessp compilation-mode "Errors were found.  See buffer %s" pop-to-buffer logs log --dolist-tail-- els file authors-coding-system a authors-author-list changed cowrote wrote author noninteractive buffer-read-only] 6 (#$ . 27813) "DEmacs source directory: "])
#@217 Produce an AUTHORS file.
Call this function in batch mode with two command line arguments FILE
and ROOT.  FILE is the file to write, ROOT is the root directory of
the Emacs source tree, from which to build the file.
(defalias 'batch-update-authors #[nil "\204\304\305!\210	G\306U\204\304\307!\210	\211A@	\211A@\310!\210\311\n!*\207" [noninteractive command-line-args-left file root error "`batch-update-authors' is to be used only with -batch" 2 "Call `batch-update-authors' with the name of the file to write" authors write-file] 2 (#$ . 30651)])
(provide 'authors)

MMCT - 2023