From: Glenn Morris Date: Thu, 28 Aug 2014 01:59:29 +0000 (-0700) Subject: Merge from emacs-24; up to 2014-07-02T00:57:53Z!juri@jurta.org X-Git-Tag: emacs-25.0.90~2635^2~679^2~416 X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=6d26235315194737c4dc8653cf6d05177a10fa9c;p=emacs.git Merge from emacs-24; up to 2014-07-02T00:57:53Z!juri@jurta.org --- 6d26235315194737c4dc8653cf6d05177a10fa9c diff --cc admin/authors.el index cb8706bbf18,00000000000..1682788f2e8 mode 100644,000000..100644 --- a/admin/authors.el +++ b/admin/authors.el @@@ -1,1385 -1,0 +1,1386 @@@ +;;; authors.el --- utility for maintaining Emacs's AUTHORS file -*-coding: utf-8 -*- + +;; Copyright (C) 2000-2014 Free Software Foundation, Inc. + +;; Author: Gerd Moellmann +;; Maintainer: Kim F. Storm +;; Keywords: maint +;; Package: emacs + +;; This file is part of GNU Emacs. + +;; GNU Emacs is free software: you can redistribute it and/or modify +;; it under the terms of the GNU General Public License as published by +;; the Free Software Foundation, either version 3 of the License, or +;; (at your option) any later version. + +;; GNU Emacs is distributed in the hope that it will be useful, +;; but WITHOUT ANY WARRANTY; without even the implied warranty of +;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the +;; GNU General Public License for more details. + +;; You should have received a copy of the GNU General Public License +;; along with GNU Emacs. If not, see . + +;;; Commentary: + +;; Use M-x authors RET to create an *Authors* buffer that can used as +;; or merged with Emacs's AUTHORS file. + +;;; Code: + +(defvar authors-coding-system 'utf-8 + "Coding system used in the AUTHORS file.") + +(defconst authors-many-files 20 + "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-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 P Templeton" "BT Templeton") + ("Brian Sniffen" "Brian T. Sniffen") + ("David Abrahams" "Dave Abrahams") + ("David J. Biesack" "David Biesack") + ("David De La Harpe Golden" "David Golden") + ("David Gillespie" "Dave Gillespie") + ("David Kågedal" "David K..edal") + ("David M. Koppelman" "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\\(ward\\( M\\)?\\)? Reingold" "Reingold Edward M") + ("Emilio C. Lopes" "Emilio Lopes") + ("Eric M. Ludlam" "Eric Ludlam") + ("Eric S. Raymond" "Eric Raymond") + ("Fabián Ezequiel Gallina" "Fabian Ezequiel Gallina" "Fabi.n E\\. Gallina") + ("Francis J. Wright" "Dr Francis J. Wright" "Francis Wright") + ("François Pinard" "Francois Pinard") + ("Francesco Potortì" "Francesco Potorti" "Francesco Potorti`") + ("Frederic Pierresteguy" "Fred Pierresteguy") + ("Gerd Möllmann" "Gerd Moellmann") + ("Hallvard B. Furuseth" "Hallvard B Furuseth" "Hallvard Furuseth") + ("Hrvoje Nikšić" "Hrvoje Niksic") + ;; lisp/org/ChangeLog 2010-11-11. + (nil "aaa bbb") + (nil "Code Extracted") ; lisp/newcomment.el's "Author:" header + ("Jaeyoun Chung" "Jae-youn Chung" "Jae-you Chung" "Chung Jae-youn") + ("Jan Djärv" "Jan D." "Jan Djarv") + ("Jay K. Adams" "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") + ("Jorgen Schäfer" "Jorgen Schaefer") + ("Joseph Arceneaux" "Joe Arceneaux") + ("Joseph M. Kelsey" "Joe Kelsey") ; FIXME ? + ("Juan León Lahoz García" "Juan-Leon Lahoz Garcia") ++ ("Jürgen Hötzel" "Juergen Hoetzel") + ("K. Shane Hartman" "Shane Hartman") + ("Kai Großjohann" "Kai Grossjohann") + ("Karl Berry" "K. Berry") + ("Károly Lőrentey" "Károly Lőrentey" "Lőrentey Károly") + ("Kazushi Marukawa" "Kazushi (Jam) Marukawa") + ("Ken Manheimer" "Kenneth Manheimer") + ("Kenichi Handa" "Ken'ichi Handa" "Kenichi HANDA" "K\\. 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") + ("Mark E. Shoulson" "Mark Shoulson") + ("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" "Paul R\\. Eggert") + ("Pavel Janík" "Pavel Janík Ml." "Pavel Janik Ml." "Pavel Janik") + ("Pavel Kobiakov" "Pavel Kobyakov") + ("Per Abrahamsen" "Per Abhiddenware") + ("Per Starbäck" "Per Starback") + ("Peter J. Weisberg" "PJ Weisberg") + ("Peter S. Galbraith" "Peter S Galbraith" "Peter Galbraith") + ("Peter Runestig" "Peter 'luna' Runestig") + ("Piotr Zieliński" "Piotr Zielinski") + ("Rainer Schöpf" "Rainer Schoepf") + ("Raja R. Harinath" "Raja R Harinath") + ("Richard G. Bielawski" "Richard G Bielawski" "Richard Bielawski") + ("Richard King" "Dick King") + ("Richard M. Stallman" "Richard Stallman" "rms@gnu.org") + ("Robert J. Chassell" "Bob Chassell") + ("Roberto Huelga Díaz" "Roberto Huelga") + ("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") + ;; There are other Stefans. +;;; ("Stefan Monnier" "Stefan") + ("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") ; FIXME ? + ("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") + ) + "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.") + +;; FIXME seems it would be less fragile to check for O', Mc, etc. +(defconst authors-fixed-case + '("Brian van den Broek" + "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" + "Jay McCarthy" + "Joel N. Weber II" + "Matt McClure" + "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" + "Thomas DeWeese" + "Tijs van Bakel") + "List of authors whose names cannot be simply capitalized.") + +(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") + "List of regexps matching files for which the FSF doesn't need papers.") + + +(defvar authors-obsolete-files-regexps + '(".*loaddefs.el$" ; not obsolete, but auto-generated + "\\.\\(cvs\\|git\\)ignore$" ; obsolete or uninteresting + "\\.arch-inventory$" + ;; TODO lib/? Matches other things? + "build-aux/" "m4/" "Emacs.xcodeproj" "mapfiles" "\\.map\\'" + "preferences\\.\\(nib\\|gorm\\)" + ;; Generated files that have since been removed. + "\\(refcard\\(-de\\|-pl\\)?\\|calccard\\|dired-ref\\|orgcard\\|\ +gnus-booklet\\|fr-drdref\\)\\.p\\(df\\|s\\)\\'") + "List of regexps matching obsolete files. +Changes to files matching one of the regexps 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" "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" + "spec.txt" + "js2-mode.el" ; only installed very briefly, replaced by js.el + ;; In the old imported lisp/url ChangeLog, but never in Emacs. + "mule-sysdp.el" + ;; Only briefly present. + "tests/gnustest-nntp.el" "tests/gnustest-registry.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" + ;; Autogen: + "cus-load.el" "finder-inf.el" "ldefs-boot.el" "loaddefs-boot.el" + "compile" "config.guess" "config.sub" "depcomp" + "autogen/compile" "autogen/config.guess" "autogen/config.in" + "autogen/config.sub" "autogen/depcomp" "autogen/install-sh" + "autogen/missing" "autogen" + "autogen/copy_autogen" ; not generated, but trivial and now removed + "dir_top" + ;; Only existed briefly, then renamed: + "images/icons/allout-widgets-dark-bg" + "images/icons/allout-widgets-light-bg" + ;; Never had any meaningful changes logged, now deleted: + "lib/stdarg.in.h" "lib/stdbool.in.h" + "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" + "copying.paper" "celibacy.1" "condom.1" "echo.msg" "sex.6" + "COOKIES" "INTERVIEW" "MAILINGLISTS" "MOTIVATION" + "NICKLES.WORTH" "INTERVAL.IDEAS" "RCP" + "3B-MAXMEM" "AIX.DUMP" "SUN-SUPPORT" "XENIX" + "CODINGS" "CHARSETS" + "calc/INSTALL" "calc/Makefile" "calc/README.prev" + "vms-pp.trans" "_emacs" "batcomp.com" "notes/cpp" ; admin/ + "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" + ;; Only existed briefly, then deleted: + "coccinelle/overlay.cocci" "coccinelle/symbol.cocci" + ;; MH-E stuff not in Emacs: + "import-emacs" "release-utils" + ;; Erc stuff not in Emacs: + "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" + ;; Used to be in admin, not very interesting. + "emacs-pretesters" "make-announcement" "make-changelog-diff" + ;; Textual comments that are not files. + "All" "Version" "Everywhere" "Many" "Various" "files" + ;; Directories. + "vms" "mac" "url" "tree-widget" + ) + "List of files and directories to ignore. +Changes to files in this list are not listed.") + +;; List via: find . -name '*.el' | sed 's/.*\///g' | sort | uniq -d +;; FIXME It would be better to discover these dynamically. +(defconst authors-ambiguous-files + '("Makefile.in" + "makefile.w32-in" + "chart.el" + "cl-lib.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" + "grammar.el" + "greek.el" + "grep.el" + "hebrew.el" + "imenu.el" + "indian.el" + "info-xref.el" + "japanese.el" + "java.el" + "lao.el" + "linux.el" + "locate.el" + "make.el" + "mode.el" + "mule-util.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" + "thingatpt.el" + "tibetan.el" + "util.el" + "vc-bzr.el" + "wisent.el") + "List of basenames occurring more than once in the source.") + +;; FIXME :cowrote entries here can be overwritten by :wrote entries +;; derived from a file's Author: header (eg mh-e). This really means +;; the Author: header is erroneous. +(defconst authors-fixed-entries + '(("Richard M. Stallman" :wrote "[The original GNU Emacs and numerous files]") + ("Joseph Arceneaux" :wrote "xrdb.c") + ;; This refers to the obsolete Willisson (qv) version. +;;; ("Blitz Product Development Corporation" :wrote "ispell.el") + ("Frank Bresz" :wrote "diff.el") + ("David M. Brown" :wrote "array.el") + ;; No longer distributed. +;;; ("Gary Byers" :changed "xenix.h") + ;; No longer distributed: freebsd.h + ;; Only trivial pieces remain, merged into configure.ac. + ("Shawn M. Carey" :wrote "[some early FreeBSD support]") + ;; hp800.h renamed from hp9000s800.h, hpux.h merged into hpux10-20.h. + ;; FIXME overwritten by Author:. + ("Satyaki Das" :cowrote "mh-search.el") + ;; No longer distributed: hp800.h, hpux10-20.h. + ;; Only trivial pieces remain, merged into configure.ac. + ("Eric Decker" :changed "sysdep.c (and other files for HP-UX support)") + ("Lawrence R. Dodd" :cowrote "dired-x.el") + ;; No longer distributed. +;;; ("Viktor Dukhovni" :wrote "unexsunos4.c") + ("Paul Eggert" :wrote "rcs2log") ; "vcdiff" + ("Fred Fish" :changed "unexcoff.c") + ;; No longer distributed. +;;; ("Tim Fleehart" :wrote "makefile.nt") + ("Keith Gabryelski" :wrote "hexl.c") + ("Kevin Gallagher" :wrote "flow-ctrl.el") + ;; Also wrote an earlier version of disp-table.el, since replaced + ;; by Erik Naggum's version; also iso-syntax.el, later renamed to + ;; latin-1.el, since deleted. + ("Howard Gayle" :wrote "casetab.c") + ;; :wrote mh-pick.el, since merged into mh-search.el. + ;; Originally wrote mh-funcs.el, but it has been rewritten since. + ("Stephen Gildea" :wrote "refcard.tex" + :cowrote "mh-funcs.el" "mh-search.el") + ;; cl.texinfo renamed to cl.texi. + ("David Gillespie" :wrote "cl.texi") + ;; No longer distributed: emacsserver.c. + ("Hewlett-Packard" :changed "emacsclient.c" "server.el" "keyboard.c") + ;; No longer distributed. +;;; ("Thomas Horsley" :wrote "cxux.h" "cxux7.h") + ("Indiana University Foundation" :changed "buffer.c" "buffer.h" + "indent.c" "search.c" "xdisp.c" "region-cache.c" "region-cache.h") + ;; ibmrt.h, ibmrt-aix.h no longer distributed. + ("International Business Machines" :changed "emacs.c" "fileio.c" + "process.c" "sysdep.c" "unexcoff.c") + ;; No longer distributed. +;;; ("Ishikawa Chiaki" :changed "aviion.h" "dgux.h") + ;; No longer distributed: ymakefile, intel386.h, mem-limits.h, template.h, + ;; linux.h (was renamed to lignux.h, then to gnu-linux.h, then removed) + ("Michael K. Johnson" :changed "configure.ac" "emacs.c" + "process.c" "sysdep.c" "syssignal.h" "systty.h" "unexcoff.c") + ;; No longer distributed. +;;; ("Kyle Jones" :wrote "mldrag.el") + ("Henry Kautz" :wrote "bib-mode.el") + ;; No longer distributed: vms-pwd.h, vmsfns.c, uaf.h, + ;; dir.h (was renamed to vmsdir.h, then removed) + ("Joseph M. Kelsey" :changed "fileio.c") + ("Sam Kendall" :changed "etags.c" "etags.el") + ;; ack.texi: "We're not using his backquote.el any more." + ("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") + ;; It was :wrote, but it has been rewritten since. + ("James R. Larus" :cowrote "mh-e.el") + ("Lars Lindberg" :changed "dabbrev.el" :cowrote "imenu.el") + ;; No longer distributed: lselect.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") + ;; MCC. No longer distributed: emacsserver.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" + ;; It was :wrote for xmenu.c, but it has been rewritten since. + "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") + ;; No longer distributed: env.c. + ("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") + ;; File removed in Emacs 24.1. +;;; ("Sundar Narasimhan" :changed "rnewspost.el") + ;; No longer distributed. +;;; ("NeXT, Inc." :wrote "unexnext.c") + ("Mark Neale" :changed "fortran.el") + ;; Renamed from sc.el. + ("Martin Neitzel" :changed "supercite.el") + ("Andrew Oram" :changed "calendar.texi (and other doc files)") + ("Frederic Pierresteguy" :wrote "widget.c") + ("Michael D. Prange" :changed "tex-mode.el") + ;; No longer distributed (dgux5-4r3.h was renamed to dgux5-4-3.h). +;;; ("Paul Reilly" :wrote "gux5-4r2.h" "dgux5-4-3.h") + ("Rob Riepel" :wrote "tpu-edt.doc") + ("Roland B. Roberts" :changed "files.el" "sort.el" + "buffer.h" "callproc.c" "dired.c" "process.c" "sysdep.c" "systty.h") + ;; No longer distributed. +;;; "vmspaths.h" "build.com" "compile.com" "kepteditor.com" "precomp.com" +;;; "vmsproc.el" :wrote "logout.com" "mailemacs.com") +;;; ("Guillermo J. Rozas" :wrote "fakemail.c") + ("Wolfgang Rupprecht" :changed "lisp-mode.el" "loadup.el" + "sort.el" "alloc.c" "callint.c" + ;; config.in renamed from config.h.in, now a generated file. + ;; ecrt0.c renamed from crt0.c, then removed. + "data.c" "fns.c" + "lisp.h" "lread.c" ; "sun3.h" "ymakefile" - no longer distributed + "print.c" :wrote "float-sup.el" "floatfns.c") + ("Schlumberger Technology Corporation" :changed "gud.el") + ;; Replaced by tcl.el. +;;; ("Gregor Schmid" :wrote "tcl-mode.el") + ;; No longer distributed since 24.1. +;;; ("Rainer Schöpf" :wrote "alpha.h" "unexalpha.c") + ;; No longer distributed: emacsserver.c. + ("William Sommerfeld" :wrote "emacsclient.c" "scribe.el") + ;; No longer distributed: emacsserver.c. + ("Leigh Stoller" :changed "emacsclient.c" "server.el") + ("Steve Strassmann" :wrote "spook.el") + ("Shinichirou Sugou" :changed "etags.c") + ;; No longer distributed: emacsserver.c. + ("Sun Microsystems, Inc" :changed "emacsclient.c" "server.el" + :wrote "emacs.icon" "sun.el") + ;; No longer distributed. +;;; "emacstool.1" "emacstool.c" "sun-curs.el" +;;; "sun-fns.el" "sun-mouse.el" "sunfns.c") + ;; Renamed from sc.el. + ("Kayvan Sylvan" :changed "supercite.el") + ;; No longer distributed: emacsserver.c, tcp.c. + ("Spencer Thomas" :changed "emacsclient.c" "server.el" + "dabbrev.el" "unexcoff.c" "gnus.texi") + ("Jonathan Vail" :changed "vc.el") + ;; No longer distributed: usg5-4.h + ("James Van Artsdalen" :changed "unexcoff.c") + ;; No longer distributed: src/makefile.nt, lisp/makefile.nt + ;; winnt.el renamed to w32-fns.el; nt.[ch] to w32.[ch]; + ;; ntheap.[ch] to w32heap.[ch]; ntinevt.c to w32inevt.c; + ;; ntproc.c to w32proc.c; ntterm.c to w32term.c; + ;; windowsnt.h to ms-w32.h. + ("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]" + "[tty menus in term.c]") + ;; Not using this version any more. +;;; ("Pace Willisson" :wrote "ispell.el") + ;; FIXME overwritten by Author:. + ("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")) + "Actions taken from the original, manually (un)maintained AUTHORS file.") + + +(defconst authors-valid-file-names + '("aclocal.m4" + "build-ins.in" + "Makefile" + "Makefile.noleim" + "makedist.bat" + "makefile.def" + "makefile.nt" + "ns.mk" + "README" + ;; There were a few of these, not just the generated top-level one. + "configure" "config.h" + "is_exec.c" "sigaction.c" + ;; nt/ + "ebuild.bat" "install.bat" "fast-install.bat" + "debug.bat.in" "emacs.bat.in" "addsection.c" + "inc/sys/dir.h" "inc/gettext.h" + ".gdbinit-union" + "alloca.s" + "make-delta" + "config.w95" + "msysconfig.sh" + "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" + "ps-prin2.ps" "ps-prin3.ps" + "emacs.xbm" "gnu.xpm" "gnus-pointer.xbm" "gnus-pointer.xpm" + ;; Moved from etc/ to etc/images, and/or removed. + "gnus.pbm" "gnus.xbm" "gnus.xpm" "letter.pbm" "letter.xbm" "letter.xpm" + "splash.pbm" "splash.xbm" "splash.xpm" "splash8.xpm" + "images/execute.pbm" "images/execute.xpm" "images/fld-open.pbm" + "images/fld-open.xpm" "images/highlight.pbm" "images/highlight.xpm" + "images/mail.pbm" "images/mail.xpm" "images/mail/alias.pbm" + "images/mail/alias.xpm" "images/mail/refile.pbm" + "images/mail/refile.xpm" "images/page-down.pbm" + "images/page-down.xpm" "images/widen.pbm" "images/widen.xpm" + "images/gnus/bar.xbm" "images/gnus/bar.xpm" + "images/gnus/reverse-smile.xpm" + "revdiff" ; admin/ + "vcdiff" "rcs-checkin" "tindex.pl" + "mainmake" "sed1.inp" "sed2.inp" "sed3.inp" ; msdos/ + "mac-fix-env.m" + ;; Deleted vms stuff: + "temacs.opt" "descrip.mms" "compile.com" "link.com" + "compact.el" "fadr.el" + "calc/calc-maint.el" + "emacs-lisp/cl-specs.el" + "emacs-lisp/eieio-comp.el" + "erc-hecomplete.el" + "eshell/esh-maint.el" + "language/persian.el" + "ledit.el" "meese.el" "iswitchb.el" "longlines.el" + "mh-exec.el" "mh-init.el" "mh-customize.el" + "net/zone-mode.el" "xesam.el" + "term/mac-win.el" "sup-mouse.el" + "term/vt102.el" "term/vt201.el" "term/vt220.el" "term/vt300.el" + "term/vt320.el" "term/vt400.el" "term/vt420.el" + "url-https.el" + "org-mac-message.el" "org-mew.el" "org-w3m.el" "org-vm.el" "org-wl.el" + "org-mks.el" "org-remember.el" "org-xoxo.el" "org-docbook.el" + "org-freemind.el" "ox-jsinfo.el" + "org-exp-blocks.el" ; maybe this is ob-exp now? dunno + "org-lparse.el" + "org-special-blocks.el" "org-taskjuggler.el" + "progmodes/cap-words.el" + ;; gnus + "nnwfm.el" "nnlistserv.el" "nnkiboze.el" "nndb.el" "nnsoup.el" + "netrc.el" "password.el" "sasl-cram.el" "sasl-digest.el" "sasl-ntlm.el" + "sasl.el" "dig.el" "dns.el" "hex-util.el" "sha1.el" "md4.el" + "hmac-def.el" "hmac-md5.el" "ntlm.el" "hashcash.el" "smime-ldap.el" + "assistant.el" "gnus-utils.el" "tls.el" "pgg-def.el" "pgg-gpg.el" + "gnus-compat.el" "pgg-parse.el" "pgg-pgp.el" "pgg-pgp5.el" "pgg.el" + "dns-mode.el" "run-at-time.el" "gnus-encrypt.el" "sha1-el.el" + "gnus-gl.el" "gnus.sum.el" "proto-stream.el" "color.el" "color-lab.el" + "eww.el" "shr-color.el" "shr.el" "earcon.el" "gnus-audio.el" "encrypt.el" + "format-spec.el" "gnus-move.el" + ;; doc + "getopt.c" "texindex.c" "news.texi" "vc.texi" "vc2-xtra.texi" + "back.texi" "vol1.texi" "vol2.texi" "elisp-covers.texi" "two.el" + "front-cover-1.texi" "locals.texi" "calendar.texi" "info-stnd.texi" + "tasks.texi" + "advice.texi" "picture.texi" "texinfo.tex" + ;; lwlib: + "dispatch.c" "dispatch.h" "xrdb-cpp.c" "xrdb.c" + "lwlib-Xol.c" "lwlib-Xol.h" "lwlib-Xolmb.c" "lwlib-Xolmb.h" + "lwlib-XolmbP.h" + ;; lib/ + "lib/stdio.c" "lib/gl_openssl.h" "lib/sigprocmask.c" + "lib/pthread_sigprocmask.c" "lib/ldtoastr.c" "lib/dummy.c" + "lib/ignore-value.h" + ;; lib-src/ + "cvtmail.c" "digest-doc.c" "emacsserver.c" "emacstool.c" "env.c" + "etags-vmslib.c" "fakemail.c" "getdate.c" "getopt.h" "getopt1.c" + "getopt_.h" "getopt_int.h" "gettext.h" "leditcfns.c" "loadst.c" + "make-path.c" "qsort.c" "sorted-doc.c" "tcp.c" "timer.c" "wakeup.c" + "yow.c" + ;; etc/ + "emacsclient.c" "etags.c" "hexl.c" "make-docfile.c" "movemail.c" + "test-distrib.c" "testfile" + "tpu-edt.doc" ; see below + ) + "File names which are valid, but no longer exist (or cannot be found) +in the repository.") + +;; Note that any directory part on the RHS is retained. +;; Cf authors-renamed-files-regexps. +;; NB So only add a directory if needed to disambiguate. +;; FIXME? +;; Although perhaps we could let authors-disambiguate-file-name do that? +(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") + ("src/config.h" . "config.h") + ("winnt.el" . "w32-fns.el") + ("linux.h" . "gnu-linux.h") + ("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") + ("debug.bat" . "debug.bat.in") + ("emacs.bat" . "emacs.bat.in") + ;; paths.h.dist -> paths.h-dist -> paths.h.in -> paths.in -> epaths.in. + ("paths.h.dist" . "epaths.in") + ("paths.h-dist" . "epaths.in") + ("paths.h.in" . "epaths.in") + ("paths.in" . "epaths.in") + ("patch1" . "sed1.inp") + ("INSTALL.MSYS" . "INSTALL") + ("server.c" . "emacsserver.c") + ("lib-src/etags.c" . "etags.c") + ;; msdos/ + ("is-exec.c" . "is_exec.c") + ("enriched.doc" . "enriched.txt") + ("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") + ;; Moved from lisp/tpu-doc.el to etc/tpu-edt.doc in Emacs 19.29. + ;; Removed in Emacs 19.30, replaced by new file etc/edt-user.doc + ;; (no associated ChangeLog entry). + ("tpu-doc.el" . "tpu-edt.doc") + ("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") + ("progmodes/dos.el" . "bat-mode.el") + ;; index and pick merged into search. + ("mh-index.el" . "mh-search.el") + ("mh-pick.el" . "mh-search.el") + ("font-setting.el" . "dynamic-setting.el") + ("help-funs.el" . "help-fns.el") + ("erc-notifications.el" . "erc-desktop-notifications.el") + ("org-complete.el" . "org-pcomplete.el") + ("org-export.el" . "ox.el") ; ? + ;; Was definitely renamed to org-latex.el, then... ? + ("org-export-latex.el" . "ox-latex.el") ; ? + ("org-exp.el" . "ox.el") ; ? + ("progmodes/cfengine3.el" . "cfengine.el") + ("progmodes/delphi.el" . "opascal.el") + ("octave-inf.el" . "octave.el") + ("octave-mod.el" . "octave.el") + ("progmodes/octave-inf.el" . "octave.el") + ("progmodes/octave-mod.el" . "octave.el") + ;; Obsolete. + ("emacs-lisp/assoc.el" . "assoc.el") + ("emacs-lisp/cust-print.el" . "cust-print.el") + ("emacs-lisp/gulp.el" . "gulp.el") + ("emulation/crisp.el" . "crisp.el") + ("emulation/tpu-edt.el" . "tpu-edt.el") + ("emulation/tpu-extras.el" . "tpu-extras.el") + ("emulation/vi.el" . "vi.el") + ("emulation/vip.el" . "vip.el") + ("emulation/ws-mode.el" . "ws-mode.el") + ("mail/mailpost.el" . "mailpost.el") + ("play/bruce.el" . "bruce.el") + ("play/yow.el" . "yow.el") + ("patcomp.el" . "patcomp.el") + ;; From lisp to etc/forms. + ("forms-d2.el" . "forms-d2.el") + ("forms-pass.el" . "forms-pass.el") + ;; From lisp/ to etc/nxml. + ("nxml/test.invalid.xml" . "test-invalid.xml") + ("nxml/test.valid.xml" . "test-valid.xml") + ;; The one in lisp is eshell/eshell.el. + ("eshell.el" . "automated/eshell.el") + ("eshell/esh-test.el" . "automated/eshell.el") + ;; INSTALL-CVS -> .CVS -> .BZR -> .REPO + ("INSTALL-CVS" . "INSTALL.REPO") + ("INSTALL.CVS" . "INSTALL.REPO") + ("INSTALL.BZR" . "INSTALL.REPO") + ("gnus-logo.eps" . "gnus-logo.eps") ; moved to refcards/ + ("build-install" . "build-ins.in") + ("build-install.in" . "build-ins.in") + ("unidata/Makefile" . "unidata/Makefile.in") + ("mac/uvs.el" . "unidata/uvs.el") + ;; Moved from top to etc/ + ("CONTRIBUTE" . "CONTRIBUTE") + ("FTP" . "FTP") + ;; Moved from top to build-aux/ + ("move-if-change" . "move-if-change") + ("update-subdirs" . "update-subdirs") + ("emacs.tex" . "emacs.texi") + ("faq.texi" . "efaq.texi") + ("major.texi" . "modes.texi") + ("msdog-xtra.texi" . "msdos-xtra.texi") + ("msdog.texi" . "msdos.texi") + ;; And from emacs/ to misc/ and back again. + ("ns-emacs.texi" . "macos.texi") + ("overrides.texi" . "gnus-overrides.texi") + ("xresmini.texi" . "xresources.texi") + ;; Not renamed, but we only have the latter in the Emacs repo. + ("trampver.texi.in" . "trampver.texi") + ;; Renamed with same directory. + ("e/eterm" . "eterm-color") + ("e/eterm.ti" . "eterm-color.ti") + ("README.txt" . "README") + ("emacs.names" . "JOKES") + ("ED.WORSHIP" . "JOKES") + ("GNU.JOKES" . "JOKES") + ("CHARACTERS" . "TODO") + ("images/gnus/mail_send.xpm" . "mail-send.xpm") ; still in images/gnus + ;; Renamed within same directory. + ("schema/xhtml-basic-form.rnc" . "xhtml-bform.rnc" ) + ("schema/xhtml-basic-table.rnc" . "xhtml-btable.rnc") + ("schema/xhtml-list.rnc" . "xhtml-lst.rnc") + ("schema/xhtml-target.rnc" . "xhtml-tgt.rnc") + ("schema/xhtml-style.rnc" . "xhtml-xstyle.rnc") + ("schema/docbook-dyntbl.rnc" . "docbk-dyntbl.rnc") + ("schema/docbook-soextbl.rnc" . "docbk-soextbl.rn" ) + ("edt-user.doc" . "edt.texi") + ("DEV-NOTES" . "nextstep") + ("org/COPYRIGHT-AND-LICENSE" . "org/README") + ;; Moved to different directories. + ("ctags.1" . "ctags.1") + ("etags.1" . "etags.1") + ("emacs.1" . "emacs.1") + ("emacsclient.1" . "emacsclient.1") + ("icons/emacs21.ico" . "emacs21.ico") + ("ja-dic" . "leim/ja-dic") + ("quail" . "leim/quail") + ;; Moved from autogen/ to admin/. + ("autogen/update_autogen" . "update_autogen") + ;; Moved from etc/ to admin/. + ("grammars" . "grammars") + ;; Moved from lisp/emacs-lisp/ to admin/. + ("emacs-lisp/authors.el" . "authors.el") + ;; From etc to lisp/cedet/semantic/. + ("grammars/bovine-grammar.el" . "bovine/grammar.el") + ("grammars/wisent-grammar.el" . "wisent/grammar.el") + ;; Moved from admin/nt/ to nt/. + ("nt/README.W32" . "README.W32") + ) + "Alist of files which have been renamed during their lifetime. +Elements are (OLDNAME . NEWNAME).") + +;; Should still test that the renamed file exists. Does it? +;; But it might be relative to a different ChangeLog... +;; +;; Note that only the basename of the RHS is used. +;; Cf authors-renamed-files-alist. +(defconst authors-renamed-files-regexps + '(("\\`\\(arg-nonnull\\|c\\+\\+defs\\|warn-on-use\\)\\.h\\'" + "build-aux/snippet/\\&") + ("\\`\\(ebuild\\|emacs\\|install\\|fast-install\\)\\.cmd\\'" "\\1.bat") + ("\\`\\(book-spine\\|cl\\|forms\\|functions\\|gnus\\|sc\\|texinfo\\|vip\\)\ +\\.texinfo\\'" "\\1.texi") + ("\\`\\(\\(calc\\|org\\|vip\\)card\\|viperCard\\|\ +\\(\\(cs\\|fr\\|sk\\)-\\)?dired-ref\\|\ +\\(\\(cs\\|de\\|fr\\|gnus\\|pl\\|pt-br\\|ru\\|sk\\)-\\)?refcard\\|\ +\\(\\(cs\\|fr\\|sk\\)-\\)?survival\\)\\.tex\\'" "refcards/\\&") + ("\\`refcard-\\(de\\|pl\\)\\.tex\\'" "refcards/\\1-refcard.tex") + ("\\`\\(refcards/\\)?fr-drdref\\.tex\\'" "refcards/fr-dired-ref.tex") + ("^\\(TUTORIAL[^/]*\\)" "tutorials/\\1") + ("\\`themes/dev-\\(tsdh-\\(?:light\\|dark\\)-theme\\.el\\)\\'" + "themes/\\1") + ;; Moved from lisp/toolbar to etc/images. + ("\\`toolbar/\\(back\\|fwd\\|left\\|right\\|up\\)_arrow\ +\\(\\.\\(?:pb\\|xp\\)m\\)\\'" "images/\\1-arrow\\2") + ("\\`toolbar/lc-\\(back\\|fwd\\|left\\|right\\|up\\)_arrow\ +\\(\\.\\(?:pb\\|xp\\)m\\)\\'" "images/low-color/\\1-arrow\\2") + ("\\`toolbar/mail_\\(compose\\|send\\)\\(\\.[xp]bm\\)\\'" + "images/mail/\\1") + ("\\`toolbar/jump_to\\(\\.\\(?:pb\\|xp\\)m\\)\\'" "images/jump-to\\1") + ("\\`toolbar/lc-jump_to\\(\\.\\(?:pb\\|xp\\)m\\)\\'" + "images/low-color/jump-to\\1") + ("\\`toolbar/\\(attach\\|cancel\\|close\\|copy\\|cut\\|\ +diropen\\|exit\\|help\\|home\\|index\\|info\\|mail\\|new\\|open\\|\ +paste\\|preferences\\|print\\|save\\|saveas\\|search\\|search-replace\\|\ +spell\\|undo\\)\\(\\.\\(?:pb\\|xp\\)m\\)\\'" "images/\\1\\2") + ("\\`toolbar/gud-\\(break\\|cont\\|down\\|finish\\|print\\|pstar\\|\ +remove\\|run\\|until\\|up\\|watch\\)\\(\\.\\(?:pb\\|xp\\)m\\)\\'" + "images/gud/\\1\\2") + ("\\`\\(toolbar/gud-\\|images/gud/\\)n\\(i\\)?\\(\\.\\(?:pb\\|xp\\)m\\)\\'" + "images/gud/next\\2\\3") + ("\\`\\(toolbar/gud-\\|images/gud/\\)s\\(i\\)?\\(\\.\\(?:pb\\|xp\\)m\\)\\'" + "images/gud/step\\2\\3") + ("\\`toolbar/lc-\\([-a-z]+\\.xpm\\)\\'" "images/low-color/\\1") + ("^\\(tree-widget/\\(?:default\\|folder\\)/[-a-z]+\\.\\(png\\|xpm\\)\\)$" + "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") + ;; Moved from leim/ to lisp/leim/. + ("\\`quail/[-a-z0-9]+\\.el\\'" "leim/\\&") + ("\\`ja-dic/ja-dic\\.el\\'" "leim/\\&") + ("\\`vc-\\(rcs\\|cvs\\|sccs\\)-hooks\\.el\\'" "vc/vc-\\1.el") + ("\\`vc-\\(annotate\\|arch\\|bzr\\|cvs\\|dav\\|dir\\|dispatcher\\|\ +git\\|hg\\|hooks\\|mtn\\|rcs\\|sccs\\|svn\\)\\.el\\'" "vc/\\&") + ("\\`ediff-\\(diff\\|help\\|hook\\|init\\|merg\\|mult\\|ptch\\|util\\|\ +vers\\|wind\\)\\.el\\'" "vc/\\&") + ("\\`pcvs-\\(defs\\|info\\|parse\\|util\\)\\.el\\'" "vc/\\&") + ("\\`\\(add-log\\|compare-w\\|cvs-status\\|diff-mode\\|diff\\|\ +ediff\\|emerge\\|log-edit\\|log-view\\|pcvs\\|smerge-mode\\|vc\\)\\.el\\'" + "vc/\\&") + ("\\`\\(emacs-lisp/\\)?helpers\\.el\\'" "emacs-lisp/subr-x.el") + ;; I assume this is (essentially) what happened, org/ChangeLog is vague. + ("\\`org-\\(ascii\\|beamer\\|html\\|icalendar\\|jsinfo\\|latex\ +\\|odt\\|publish\\)\\.el\\'" "ox-\\1.el") + ;; From test/ to test/automated/. + ("comint-testsuite.el" "automated/\\&") + ("\\`\\(bytecomp\\|font-parse\\|icalendar\\|occur\\|newsticker\\)\ +-testsuite\\.el" "automated/\\1-tests.el") + ;; NB lax rules should come last. + ("^m/m-\\(.*\\.h\\)$" "m/\\1" t) + ("^m-\\(.*\\.h\\)$" "\\1" t) + ("^s/s-\\(.*\\.h\\)$" "s/\\1" t) + ("^s-\\(.*\\.h\\)$" "\\1" t) + ("\\.\\(el\\|[ch]\\|x[pb]m\\|pbm\\)\\'" t t) + ) + "List of regexps and rewriting rules for renamed files. +Elements are (REGEXP REPLACE [LAX]). 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. +Elements with LAX non-nil are only used in `authors-lax-changelogs'.") + +;; It's really not worth trying to make these old logs fully valid. +;; All the obvious real errors are gone. +;; The main issue is _lots_ of moving around of files. +;; Eg the progmodes/ (etc) directories did not exist before 1997. +;; Also, lib-src/ did not exist, the files were in etc/. +;; And various other things. +;; Maybe this should just be any ChangeLog with a . extension, +;; assuming we always fix logs fully before rotating them? +(defconst authors-lax-changelogs + '("erc/ChangeLog\\.0[1-8]\\'" + "gnus/ChangeLog\\.[1-2]\\'" + "lisp/ChangeLog\\.\\([1-9]\\|1[0-5]\\)\\'" + "mh-e/ChangeLog\\.1\\'" + "src/ChangeLog\\.\\([1-9]\\|1[0-2]\\)\\'") + "List of regexps matching ChangeLogs that we do not print errors from. +These are older ChangeLogs that have various issues. +Additionally, for these logs we apply the `lax' elements of +`authors-renamed-files-regexps'.") + + +(defvar authors-checked-files-alist) +(defvar authors-invalid-file-names) + +;; This has become rather yucky. :( +(defun authors-disambiguate-file-name (fullname) + "Convert FULLNAME to an unambiguous relative-name." + (let ((relname (file-name-nondirectory fullname)) + dir parent) + (if (and (member relname authors-ambiguous-files) + ;; Try to identify the top-level directory. + ;; FIXME should really use ROOT from M-x authors. + (not (and (file-directory-p + (expand-file-name + "lib-src" + (setq dir (file-name-directory fullname)))) + (file-directory-p (expand-file-name "etc" dir))))) + ;; I think it looks weird to see eg "lisp/simple.el". + ;; But for eg Makefile.in, we do want to say "lisp/Makefile.in". + (if (and (string-equal "lisp" + (setq parent (file-name-nondirectory + (directory-file-name dir)))) + ;; TODO better to simply have hard-coded list? + ;; Only really Makefile.in where this applies. + (not (file-exists-p + (expand-file-name (concat "../" relname) dir)))) + relname + ;; In case of ambiguity, just prepend the parent directory. + ;; FIXME obviously this is not a perfect solution. + (format "%s/%s" (file-name-nondirectory (directory-file-name dir)) + relname)) + relname))) + +(defun authors-lax-changelog-p (file) + "Return non-nil if FILE matches `authors-lax-changelogs'." + (let ((list authors-lax-changelogs) + found) + (while list + (setq list (if (setq found (string-match-p (car list) file)) + nil + (cdr list)))) + found)) + +(defun authors-canonical-file-name (file log-file pos author) + "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." + ;; FILE should be re-checked in every different directory associated + ;; with a LOG-FILE. Eg configure.ac from src/ChangeLog is not the + ;; same as that from top-level/ChangeLog. + (let* ((fullname (expand-file-name file (file-name-directory log-file))) + (entry (assoc fullname authors-checked-files-alist)) + laxlog relname valid) + (if entry + (cdr entry) + (setq relname (file-name-nondirectory file)) + (if (or (member file authors-valid-file-names) + (member relname authors-valid-file-names) + (file-exists-p file) + (file-exists-p relname) ; FIXME? appropriate? + ) + (setq valid (authors-disambiguate-file-name fullname)) + (if (setq valid (assoc file authors-renamed-files-alist)) + (setq valid (cdr valid)) + (setq laxlog (authors-lax-changelog-p log-file)) + (let ((rules authors-renamed-files-regexps) + rule) + (while rules + (setq rule (car rules)) + (if (and (or laxlog (not (nth 2 rule))) + (string-match (car rule) file)) + (setq valid (if (stringp (nth 1 rule)) + (file-name-nondirectory + (replace-match (nth 1 rule) t nil file)) + relname) + rules nil) + (setq rules (cdr rules))))))) + (setq authors-checked-files-alist + (cons (cons fullname valid) authors-checked-files-alist)) + (unless (or valid + (member file authors-ignored-files) + (authors-obsolete-file-p file) + (string-match "[*]" file) + (string-match "^[0-9.]+$" file) + laxlog) + (setq authors-invalid-file-names + (cons (format "%s:%d: unrecognized `%s' for %s" + log-file + (1+ (count-lines (point-min) pos)) + file author) + authors-invalid-file-names))) + valid))) + +(defun authors-add-fixed-entries (table) + "Add actions from `authors-fixed-entries' to TABLE." + (dolist (entry authors-fixed-entries) + (let ((author (car entry)) + action) + (dolist (item (cdr entry)) + (if (symbolp item) + (setq action item) + (authors-add author item action table)))))) + + +(defun authors-obsolete-file-p (file) + "Return non-nil if FILE is obsolete. +FILE is considered obsolete if it matches one of the regular expressions +from `authors-obsolete-files-regexps'." + (let (obsolete-p + (regexps authors-obsolete-files-regexps)) + (while (and regexps (not obsolete-p)) + (setq obsolete-p (string-match (car regexps) file) + regexps (cdr regexps))) + obsolete-p)) + + +(defun authors-add (author file action table) + "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." + (unless (or (member file authors-ignored-files) + (authors-obsolete-file-p file) + (equal author "")) + (let* ((value (gethash author table)) + (entry (assoc file value)) + slot) + (if (null entry) + (puthash author (cons (list file (cons action 1)) value) table) + (if (setq slot (assoc action (cdr entry))) + (setcdr slot (1+ (cdr slot))) + (nconc entry (list (cons action 1)))))))) + + +(defun authors-canonical-author-name (author) + "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'." + (let* ((aliases authors-aliases) + regexps realname) + (while aliases + (setq realname (car (car aliases)) + regexps (cdr (car aliases)) + aliases (cdr aliases)) + (while regexps + (if (string-match (car regexps) author) + (setq author realname + regexps nil + aliases nil) + (setq regexps (cdr regexps)))))) + (when author + (setq author (replace-regexp-in-string "[ \t]*[(<].*$" "" author)) + (setq author (replace-regexp-in-string "\`[ \t]+" "" author)) + (setq author (replace-regexp-in-string "[ \t]+$" "" author)) + (setq author (replace-regexp-in-string "[ \t]+" " " author)) + (unless (string-match "[-, \t]" author) + (setq author "")) + (or (car (member author authors-fixed-case)) + (capitalize author)))) + +(defun authors-scan-change-log (log-file table) + "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." + + (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)) + authors pos) + (with-current-buffer buffer + (save-restriction + (widen) + (goto-char (point-min)) + (while (re-search-forward "^[0-9]\\|^[ \t]+\\* " nil t) + (beginning-of-line) + (setq pos (point)) + (cond ((looking-at "^[0-9]+-[0-9]+-[0-9]+") + ;; Handle joint authorship of changes. + ;; This can be a bit fragile, and is not too common. + (setq authors nil) + (while (progn + (skip-chars-forward " \t+:0-9-") + (not (looking-at "\\($\\|\\*\\|\ +Suggested\\|Trivial\\|Version\\|Originally\\|From:\\|Patch[ \t]+[Bb]y\\)"))) + (push (authors-canonical-author-name + (buffer-substring-no-properties + (point) (line-end-position))) authors) + (forward-line 1))) + ((looking-at "^[ \t]+\\*") + (let ((line (buffer-substring-no-properties + (match-end 0) (line-end-position)))) + (while (and (not (string-match ":" line)) + (forward-line 1) + (not (looking-at ":\\|^[ \t]*$"))) + (setq line (concat line + (buffer-substring-no-properties + (line-beginning-position) + (line-end-position))))) + (when (string-match ":" line) + (setq line (substring line 0 (match-beginning 0))) + (setq line (replace-regexp-in-string "[[(<{].*$" "" line)) + (setq line (replace-regexp-in-string "," "" line)) + (dolist (file (split-string line)) + (when (setq file (authors-canonical-file-name file log-file pos (car authors))) + (dolist (author authors) + ;;(message "%s changed %s" author file) + (authors-add author file :changed table))))) + (forward-line 1))))))) + (unless existing-buffer + (kill-buffer buffer)))) + + +(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) ; for find-file, hence let* + (enable-local-eval nil) + (buffer (find-file-noselect file))) + (setq file (authors-disambiguate-file-name (expand-file-name file))) + (with-current-buffer buffer + (save-restriction + (widen) + (goto-char (point-min)) + (while (and (re-search-forward + "^;+[ \t]*\\(Authors?\\|Commentary\\|Code\\):[ \t]*" nil t) + (not (member (match-string 1) '("Commentary" "Code")))) + (let ((continue t) + (action :wrote) + authors) + (while continue + ;; Some entries contain a year range in front of the + ;; author's name. + (skip-chars-forward "-0-9 \t") + (push (authors-canonical-author-name + (buffer-substring-no-properties + (point) (line-end-position))) authors) + ;; tips.texi says the continuation line should begin + ;; with a tab, but often spaces are used. + (setq continue + (and (zerop (forward-line 1)) + (looking-at ";;;?\\(\t+ *\\| +\\)[[:alnum:]]") + (goto-char (1- (match-end 0))) + (not (looking-at "[[:upper:]][-[:alpha:]]+:[ \t]"))))) + (and (> (length authors) 1) + (setq action :cowrote)) + (mapc (lambda (author) + (authors-add author file action table)) + authors))))) + (unless existing-buffer + (kill-buffer buffer)))) + + +(defun authors-public-domain-p (file) + "Return t if FILE is a file that was put in public domain." + (let ((public-domain-p nil) + (list authors-public-domain-files)) + (while (and list (not public-domain-p)) + (when (string-match (car list) file) + (setq public-domain-p t)) + (setq list (cdr list))) + public-domain-p)) + +(defvar authors-author-list) + +(defun authors-add-to-author-list (author changes) + "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." + (when author + (let ((nchanged 0) + wrote-list + cowrote-list + changed-list) + (dolist (change changes) + (let* ((actions (cdr change)) + (file (car change)) + (filestat (if (authors-public-domain-p file) + (concat file " (public domain)") + file))) + (cond ((assq :wrote actions) + (setq wrote-list (cons filestat wrote-list))) + ((assq :cowrote actions) + (setq cowrote-list (cons filestat cowrote-list))) + (t + (setq changed-list + (cons (cons file (cdr (assq :changed actions))) + changed-list)))))) + (if wrote-list + (setq wrote-list (sort wrote-list 'string-lessp))) + (if cowrote-list + (setq cowrote-list (sort cowrote-list 'string-lessp))) + (when changed-list + (setq changed-list (sort changed-list + (lambda (a b) + (if (= (cdr a) (cdr b)) + (string-lessp (car a) (car b)) + (> (cdr a) (cdr b)))))) + (setq nchanged (length changed-list)) + (setq changed-list (mapcar 'car changed-list))) + (if (> (- nchanged authors-many-files) 2) + (setcdr (nthcdr authors-many-files changed-list) + (list (format "and %d other files" (- nchanged authors-many-files))))) + (setq authors-author-list + (cons (list author wrote-list cowrote-list changed-list) + authors-author-list))))) + +(defun authors (root) + "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." + (interactive "DEmacs source directory: ") + (setq root (expand-file-name root)) + (let ((logs (process-lines find-program root "-name" "ChangeLog*")) + (table (make-hash-table :test 'equal)) + (buffer-name "*Authors*") + authors-checked-files-alist + authors-invalid-file-names) + (authors-add-fixed-entries table) + (unless (file-exists-p (expand-file-name "src/emacs.c" root)) + (unless (y-or-n-p + (format "Not the root directory of Emacs: %s, continue? " root)) + (error "Not the root directory"))) + (dolist (log logs) + (when (string-match "ChangeLog\\(.[0-9]+\\)?$" log) + (message "Scanning %s..." log) + (authors-scan-change-log log table))) + (let ((els (process-lines find-program root "-name" "*.el"))) + (dolist (file els) + (message "Scanning %s..." file) + (authors-scan-el file table))) + (message "Generating buffer %s..." buffer-name) + (set-buffer (get-buffer-create buffer-name)) + (erase-buffer) + (set-buffer-file-coding-system authors-coding-system) + (insert +"Many people have contributed code included in the Free Software +Foundation's distribution of GNU Emacs. To show our appreciation for +their public spirit, we list here in alphabetical order a condensed +list of their contributions.\n") + (let (authors-author-list) + (maphash #'authors-add-to-author-list table) + (setq authors-author-list + (let ((process-environment (cons "LC_COLLATE=en_US.UTF-8" + process-environment))) + (sort authors-author-list + (lambda (a b) + (string-collate-lessp (car a) (car b)))))) + (dolist (a authors-author-list) + (let ((author (car a)) + (wrote (nth 1 a)) + (cowrote (nth 2 a)) + (changed (nth 3 a))) + (insert "\n" author ": ") + (when wrote + (insert "wrote") + (dolist (file wrote) + (if (> (+ (current-column) (length file)) 72) + (insert "\n ")) + (insert " " file)) + (insert "\n")) + (when cowrote + (if wrote + (insert "and ")) + (insert "co-wrote") + (dolist (file cowrote) + (if (> (+ (current-column) (length file)) 72) + (insert "\n ")) + (insert " " file)) + (insert "\n")) + (when changed + (if (or wrote cowrote) + (insert "and ")) + (insert "changed") + (dolist (file changed) + (if (> (+ (current-column) (length file)) 72) + (insert "\n ")) + (insert " " file)) + (insert "\n"))))) + (insert "\nLocal" " Variables:\ncoding: " + (symbol-name authors-coding-system) "\nEnd:\n") + (message "Generating buffer %s... done" buffer-name) + (unless noninteractive + (when authors-invalid-file-names + (with-current-buffer (get-buffer-create "*Authors Errors*") + (setq buffer-read-only nil) + (erase-buffer) + (set-buffer-file-coding-system authors-coding-system) + (insert "Unrecognized file entries found:\n\n") + (mapc (lambda (f) (if (not (string-match "^[A-Za-z]+$" f)) (insert f "\n"))) + (sort authors-invalid-file-names 'string-lessp)) + (goto-char (point-min)) + (compilation-mode) + (message "Errors were found. See buffer %s" (buffer-name)))) + (pop-to-buffer buffer-name)))) + + +(defun batch-update-authors () + "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." + (unless noninteractive + (error "`batch-update-authors' is to be used only with -batch")) + (when (/= (length command-line-args-left) 2) + (error "Call `batch-update-authors' with the name of the file to write")) + (let* ((file (pop command-line-args-left)) + (root (pop command-line-args-left))) + (authors root) + (write-file file))) + +(provide 'authors) + +;;; authors.el ends here diff --cc doc/lispref/ChangeLog index 3719b223b35,7a88fd456d3..783be72e830 --- a/doc/lispref/ChangeLog +++ b/doc/lispref/ChangeLog @@@ -1,22 -1,9 +1,27 @@@ -2014-08-19 Eli Zaretskii ++2014-08-28 Eli Zaretskii + + * display.texi (Bidirectional Display): Update the Emacs's class + of bidirectional conformance. + -2014-07-08 Stefan Monnier +2014-08-27 Dmitry Antipov + + * eval.texi (Eval): Mention possible recovery from stack overflow. + +2014-07-11 Eli Zaretskii + + * internals.texi (Garbage Collection): Fix last change. + +2014-07-11 Dmitry Antipov + + * internals.texi (Garbage Collection): Mention memory-info. + +2014-07-11 Michael Albinus + + * minibuf.texi (Intro to Minibuffers, Reading a Password): + Password hiding is available in batch mode, do not mention it in + the exclusion list. Mention `read-hide-char'. (Bug#17839) + +2014-07-09 Stefan Monnier * debugging.texi (Function Debugging, Debugger Commands): Update debug-on-entry w.r.t behavior after redefinitions (bug#17902). diff --cc etc/ChangeLog index 72c8334d3df,43027e57f89..4a79ec47a4b --- a/etc/ChangeLog +++ b/etc/ChangeLog @@@ -1,25 -1,21 +1,29 @@@ + 2014-08-28 Glenn Morris + + * emacs.appdata.xml: New file; description from Emacs's homepage. + -2014-07-12 Eli Zaretskii +2014-08-25 Eli Zaretskii - * PROBLEMS: Mention the problem from bug #17950. + * NEWS: Mention that string-collate-* functions are supported on + MS-Windows as well. -2014-07-04 Eli Zaretskii +2014-08-08 Jan Nieuwenhuizen - * TODO: Remove items that were already done. Rearrange a few - items that are closely related. Update a couple of items with new - information. + * compilation.txt (file): Add Guile backtrace example. - * NEWS: Mention 'network-interface-list' and 'network-interface-info' - being available on MS-Windows. +2014-08-09 Reuben Thomas -2014-06-29 Glenn Morris + * PROBLEMS: Remove msdos/is_exec.c and sigaction.c. + +2014-07-21 Dmitry Antipov + + * TODO: remove frame height remark. + +2014-07-11 Michael Albinus + + * NEWS: Passwords in batch mode are hidden. + +2014-07-03 Glenn Morris * refcards/calccard.tex (section{Getting Help}): Meaning of "on-line" has changed. diff --cc lisp/ChangeLog index b2674b3b6af,00bb37a1714..73f3287ed40 --- a/lisp/ChangeLog +++ b/lisp/ChangeLog @@@ -1,125 -1,27 +1,148 @@@ -2014-08-27 Michael Albinus ++2014-08-28 Michael Albinus + + * emacs-lisp/authors.el (authors-aliases): Addition. + + * net/tramp-adb.el: Spell author name correctly. + -2014-08-27 João Távora ++2014-08-28 João Távora + + * net/shr.el (shr-expand-url): Plain expand-file-name is not enough; + use url-expand-file-name. (Bug#18310) + -2014-08-25 Glenn Morris ++2014-08-28 Glenn Morris + + * emulation/cua-rect.el (cua--highlight-rectangle): + Avoid error at point-min. (Bug#18309) + -2014-08-18 Stefan Monnier ++2014-08-28 Stefan Monnier + + * progmodes/python.el (python-shell-prompt-detect): Remove redundant + executable-find (bug#18244). + + * simple.el (self-insert-uses-region-functions): Defvar. + -2014-08-13 Leo Liu +2014-08-28 Glenn Morris + + * subr.el (remq): Revert 2014-08-25 doc change (not always true). + +2014-08-27 Dmitry Antipov + + * startup.el (normal-top-level): Now use internal--top-level-message. + +2014-08-26 Dmitry Antipov + + * startup.el (normal-top-level): Use top-level-message. + +2014-08-25 Lars Magne Ingebrigtsen + + * net/shr.el (shr-copy-url): Encode copied URL to avoid getting + URLs containing spaces and the like. + +2014-08-25 Christoph Scholtes + + * subr.el (remq): Fix docstring (Bug#18253). + +2014-08-25 Christoph Scholtes + + * replace.el (query-replace): Fix typo in docstring (Bug#18320). + +2014-08-24 Alan Mackenzie + + Handle C++11's "auto" and "decltype" constructions. + * progmodes/cc-engine.el (c-forward-type): Enhance to recognise + and return 'decltype. + (c-forward-decl-or-cast-1): New let variables backup-kwd-sym, + prev-kwd-sym, new-style-auto. Enhance to handle the new "auto" + keyword. + * progmodes/cc-fonts.el (c-font-lock-declarations): Handle the + "decltype" keyword. + (c-font-lock-c++-new): Handle "decltype" constructions. + * progmodes/cc-langs.el (c-auto-ops, c-auto-ops-re): New + c-lang-defconsts/defvars. + (c-haskell-op, c-haskell-op-re): New c-lang-defconsts/defvars. + (c-typeof-kwds, c-typeof-key): New c-lang-defconsts/defvars. + (c-typeless-decl-kwds): Append "auto" onto the C++ value. + (c-not-decl-init-keywords): Also exclude c-typeof-kwds from value. + + Make ">>" act as double template ender in C++ Mode. + * progmodes/cc-langs.el (c->-op-cont-tokens): New lang-const split + off from c->-op-cont-re. + (c->-op-cont-tokens): Change to use the above. + (c->-op-without->-cont-regexp): New lang-const. + * progmodes/cc-engine.el (c-forward-<>-arglist-recur): Use + c->-op-without->-cont-regexp in place of c->-op-cont-tokens. + + +2014-08-23 Alan Mackenzie + + * progmodes/cc-fonts.el (c-font-lock-declarators): Fix infinite + loop, bug #18306. The bug was introduced on 2014-08-02. + +2014-08-21 Eli Zaretskii + + * textmodes/texnfo-upd.el (texinfo-specific-section-type): Don't + recognize a Top node if there are other sectioning commands + earlier in the Texinfo file. This fixes a bug in + texinfo-make-menu and avoids inflooping in + texinfo-all-menus-update when they are invoked on texinfo.texi. + +2014-08-21 Martin Rudalics + + * window.el (window--side-window-p): New function. + (split-window, window-splittable-p): Use window--side-window-p to + determine whether WINDOW can be split (Bug#18304). + * calendar/calendar.el (calendar-basic-setup): Fix one call of + `window-splittable-p' and add another (Bug#18304). + +2014-08-20 Sam Steingold + + * progmodes/python.el (python-new-pythonpath): Extract from + `python-shell-calculate-process-environment'. + +2014-08-18 Thierry Volpiatto + + * emacs-lisp/eldoc.el (eldoc-highlight-function-argument): Add support + for &key args (bug#18048). + +2014-08-18 Stefan Monnier + + * emacs-lisp/eldoc.el (eldoc-argument-case): Obsolete and change default. + (eldoc-function-argstring-format): Remove. + (eldoc-function-argstring): Always return upcase args. + Use help-make-usage. Don't add parens. + (eldoc-get-fnsym-args-string): Don't obey eldoc-argument-case since + it's too late to do it right (bug#18048). + +2014-08-18 Eli Zaretskii + + * scroll-bar.el (scroll-bar-horizontal-drag-1) + (scroll-bar-toolkit-horizontal-scroll): When determining the + paragraph direction, use the buffer of the window designated in + the event. + +2014-08-16 Andreas Schwab + + * vc/diff-mode.el (diff-fixup-modifs): Handle empty line in + context of unified diff. + +2014-08-16 Paul Eggert + + Add dependencies to fix loaddefs race during parallel builds. + Without this, for example, 'make -j bootstrap' can fail and report + "Opening input file: no such file or directory, + .../lisp/calendar/diary-loaddefs.el ... recipe for target + 'calendar/hol-loaddefs.el' failed", where the hol-loaddefs.el rule + got confused because diary-loaddefs.el was being built in parallel. + * Makefile.in ($(CAL_DIR)/diary-loaddefs.el): + Depend on $(CAL_DIR)/cal-loaddefs.el. + ($(CAL_DIR)/hol-loaddefs.el): Depend on $(CAL_DIR)/diary-loaddefs.el. + +2014-08-16 Martin Rudalics + + * scroll-bar.el (scroll-bar-horizontal-drag-1): Use cdr of + portion-whole for scrolling right-to-left text. + +2014-08-15 Leo Liu * speedbar.el (speedbar-generic-list-tag-p): Allow special elements from imenu. diff --cc lisp/progmodes/python.el index 4f645ad64c8,a51cff8529e..f12486d0acb --- a/lisp/progmodes/python.el +++ b/lisp/progmodes/python.el @@@ -2101,86 -2087,16 +2104,85 @@@ uniqueness for different types of confi (defun python-shell-calculate-exec-path () "Calculate exec path given `python-shell-virtualenv-path'." (let ((path (append python-shell-exec-path - exec-path nil))) + exec-path nil))) ;FIXME: Why nil? (if (not python-shell-virtualenv-path) path - (cons (format "%s/bin" - (directory-file-name python-shell-virtualenv-path)) + (cons (expand-file-name "bin" python-shell-virtualenv-path) path)))) -(defun python-comint-output-filter-function (output) - "Hook run after content is put into comint buffer. -OUTPUT is a string with the contents of the buffer." - (ansi-color-filter-apply output)) +(defvar python-shell--package-depth 10) + +(defun python-shell-package-enable (directory package) + "Add DIRECTORY parent to $PYTHONPATH and enable PACKAGE." + (interactive + (let* ((dir (expand-file-name + (read-directory-name + "Package root: " + (file-name-directory + (or (buffer-file-name) default-directory))))) + (name (completing-read + "Package: " + (python-util-list-packages + dir python-shell--package-depth)))) + (list dir name))) + (python-shell-send-string + (format + (concat + "import os.path;import sys;" + "sys.path.append(os.path.dirname(os.path.dirname('''%s''')));" + "__package__ = '''%s''';" + "import %s") + directory package package) + (python-shell-get-process))) + +(defun python-shell-accept-process-output (process &optional timeout regexp) + "Accept PROCESS output with TIMEOUT until REGEXP is found. +Optional argument TIMEOUT is the timeout argument to +`accept-process-output' calls. Optional argument REGEXP +overrides the regexp to match the end of output, defaults to +`comint-prompt-regexp.'. Returns non-nil when output was +properly captured. + +This utility is useful in situations where the output may be +received in chunks, since `accept-process-output' gives no +guarantees they will be grabbed in a single call. An example use +case for this would be the CPython shell start-up, where the +banner and the initial prompt are received separetely." + (let ((regexp (or regexp comint-prompt-regexp))) + (catch 'found + (while t + (when (not (accept-process-output process timeout)) + (throw 'found nil)) + (when (looking-back regexp) + (throw 'found t)))))) + +(defun python-shell-comint-end-of-output-p (output) + "Return non-nil if OUTPUT is ends with input prompt." + (string-match + ;; XXX: It seems on OSX an extra carriage return is attached + ;; at the end of output, this handles that too. + (concat + "\r?\n?" + ;; Remove initial caret from calculated regexp + (replace-regexp-in-string + (rx string-start ?^) "" + python-shell--prompt-calculated-input-regexp) + (rx eos)) + output)) + +(define-obsolete-function-alias + 'python-comint-output-filter-function + 'ansi-color-filter-apply + "24.5") + +(defun python-comint-postoutput-scroll-to-bottom (output) + "Faster version of `comint-postoutput-scroll-to-bottom'. +Avoids `recenter' calls until OUTPUT is completely sent." + (when (and (not (string= "" output)) + (python-shell-comint-end-of-output-p + (ansi-color-filter-apply output))) + (comint-postoutput-scroll-to-bottom output)) + output) (defvar python-shell--parent-buffer nil) diff --cc msdos/ChangeLog index 150ef22c444,3dd5476910e..da0d7098d1a --- a/msdos/ChangeLog +++ b/msdos/ChangeLog @@@ -1,16 -1,15 +1,26 @@@ -2014-08-25 Eli Zaretskii ++2014-08-28 Eli Zaretskii + + * sedlibmk.inp (gl_LIBOBJS): Add execinfo.o. Reported by Juan + Manuel Guerrero . + -2014-08-23 Eli Zaretskii - + * sed2v2.inp [DJGPP <= 2.03]: Add a prototype for snprintf, to + avoid compilation warning from newer GCC versions that have + snprintf as a built-in. Reported by Juan Manuel Guerrero + . + +2014-08-09 Eli Zaretskii + + * INSTALL: Fix last change. + +2014-08-09 Reuben Thomas + + * is_exec.c, sigaction.c: Remove files. + * sed2v2.inp: Remove support for DJGPP 2.01. + * INSTALL: Don't mention removed files msdos/is_exec.c and + sigaction.c, and increase minimum version of DJGPP to 2.02. + * README: Remove note on legal status of removed files + is_exec.c and sigaction.c. + 2014-04-16 Eli Zaretskii * sedlisp.inp: diff --cc src/ChangeLog index e79cef6a8a4,8ca95025019..d08b3780242 --- a/src/ChangeLog +++ b/src/ChangeLog @@@ -1,166 -1,27 +1,183 @@@ -2014-08-25 Eli Zaretskii ++2014-08-28 Eli Zaretskii + + * conf_post.h (_GL_EXECINFO_INLINE) [MSDOS]: Don't define. + -2014-08-18 Eli Zaretskii - - * xdisp.c (handle_stop): Improve commentary. - + * indent.c (Fvertical_motion): Fix vertical motion up through a + display property after a newline. (Bug#18276) + -2014-08-17 Eli Zaretskii - + * xdisp.c (display_line): Don't assume that the call to + reseat_at_next_visible_line_start ends up at a character + immediately following the newline on the previous line. Avoids + setting the ends_at_zv_p flag on screen lines that are not at or + beyond ZV, which causes infloop in redisplay. For the details, see + http://lists.gnu.org/archive/html/emacs-devel/2014-08/msg00368.html. + + * dispnew.c (buffer_posn_from_coords): Fix mirroring of X + coordinate for hscrolled R2L screen lines. (Bug#18277) + -2014-08-11 Ken Brown +2014-08-28 Paul Eggert + + * sysdep.c (LC_COLLATE, LC_COLLATE_MASK): Give individual defaults + (Bug#18051). + +2014-08-27 Eli Zaretskii + + * syntax.c (scan_lists): Don't examine positions before BEGV. + (Bug#18339) + +2014-08-27 Paul Eggert + + Improve robustness of new string-collation code (Bug#18051). + * sysdep.c (LC_COLLATE, LC_COLLATE_MASK, freelocale, locale_t) + (newlocale, wcscoll_l): Define substitutes for platforms that + lack them, so as to simplify the mainline code. + (str_collate): Simplify the code by assuming the above definitions. + Use wcscoll_l, not uselocale, as uselocale is too fragile. For + example, the old version left the Emacs in the wrong locale if + wcscoll reported an error. Use 'int', not ptrdiff_t, for the int + result. Report an error if newlocale fails. + +2014-08-27 Michael Albinus + + * lisp.h (str_collate): + * sysdep.c (str_collate): Return int. + (str_collate) [__STDC_ISO_10646__]: Propagate error of wcscoll. + +2014-08-27 Dmitry Antipov + + Fix some glitches in previous change. + * sysdep.c (stack_direction): Replace stack_grows_down + to simplify calculation of stack boundaries. + (handle_sigsegv): Check whether we really crash somewhere near + to stack boundary, and handle fatal signal as usual if not. + (init_sigsegv): Adjust accordingly. + * keyboard.c (Vtop_level_message): Rename to + Vinternal__top_level_message, as suggested by Stefan Monnier in + http://lists.gnu.org/archive/html/emacs-devel/2014-08/msg00493.html + All related users changed. + +2014-08-26 Dmitry Antipov + + Handle C stack overflow caused by too nested Lisp evaluation. + * lisp.h (toplevel) [HAVE_STACK_OVERFLOW_HANDLING]: Declare + siglongjmp point to transfer control from SIGSEGV handler. + * keyboard.c (return_to_command_loop, recover_top_level_message) + [HAVE_STACK_OVERFLOW_HANDLING]: New variables. + (regular_top_level_message): New variable. + (command_loop) [HAVE_STACK_OVERFLOW_HANDLING]: Handle non-local + exit from SIGSEGV handler and adjust message displayed by Vtop_level + if appropriate. + (syms_of_keyboard): DEFVAR Vtop_level_message and initialize + new variables described above. + * sysdep.c [HAVE_SYS_RESOURCE_H]: Include sys/resource.h as such. + (stack_grows_down, sigsegv_stack, handle_sigsegv) + [HAVE_STACK_OVERFLOW_HANDLING]: New variables and function. + (init_sigsegv): New function. + (init_signals): Use it. + +2014-08-25 Ken Brown + + * emacs.c (main): Remove use of obsolete macro + G_SLICE_ALWAYS_MALLOC. + +2014-08-25 Eli Zaretskii + + Implement locale-sensitive string collation for MS-Windows. + * w32proc.c (get_lcid_callback, get_lcid, w32_compare_strings): + New functions. (Bug#18051) + + * w32.h (w32_compare_strings): Add prototype. + + * w32.c : New global flag. + (globals_of_w32): Initialize it. + + * sysdep.c (str_collate) [WINDOWSNT]: Implementation for MS-Windows. + + * fns.c (Fstring_collate_lessp, Fstring_collate_equalp) + [WINDOWSNT]: Call str_collate on MS-Windows. + +2014-08-25 Dmitry Antipov + + One more minor cleanup of font subsystem. + * font.h (struct font_driver): Convert text_extents to + return void because returned value is never actually used. + * macfont.m (macfont_text_extents): + * w32font.c (w32font_text_extents): + * xftfont.c (xftfont_text_extents): Adjust to return void + and assume that 'metrics' argument is always non-NULL. + * ftfont.c (ftfont_text_extents): + * xfont.c (xfont_text_extents): Likewise. Avoid redundant memset. + +2014-08-25 Paul Eggert + + Minor cleanups of str_collate fix (Bug#18051). + * fns.c (str_collate): Move decl from here ... + * lisp.h (str_collate): ... to here. + * sysdep.c (str_collate): Prune away some of the forest of ifdefs. + Remove unnecessary casts. Use SAFE_NALLOCA to avoid + potential problems with integer overflow. Don't assume + setlocale succeeds. Remove unnecessary test before restoring + locale via setlocale, and free the copied setlocale string + when done with it. + +2014-08-24 Michael Albinus + + * fns.c (Fstring_collate_lessp, Fstring_collate_equalp): New DEFUNs. + + * sysdep.c (str_collate): New function. (Bug#18051) + +2014-08-23 Karol Ostrovsky (tiny change) + + * Makefile.in (emacs$(EXEEXT)): Retry deletion of bootstrap-emacs + if the initial "rm -f" fails. This is for MinGW builds, where + MS-Windows will not allow deleting the executable file of a + running program. + +2014-08-20 Eli Zaretskii + + * w32term.c (w32_scroll_bar_handle_click) + (w32_horizontal_scroll_bar_handle_click) + (x_scroll_bar_report_motion) + (x_horizontal_scroll_bar_report_motion): For SB_THUMBPOSITION and + SB_THUMBTRACK, use the 32-bit position information returned by + GetScrollInfo, not the 16-bit information returned in the Windows + message sent to us. + +2014-08-19 Eli Zaretskii + + * w32term.c (w32_horizontal_scroll_bar_handle_click): Fix the + second coordinate ('y') reported for dragging the horizontal + scroll bar thumb. + +2014-08-19 YAMAMOTO Mitsuharu + + * xdisp.c (erase_phys_cursor): Fix confusion between window-relative + and text area-relative x-coordinates. + +2014-08-17 Eli Zaretskii + + Avoid overwriting the reversed_p flags in the glyph matrices when + init_iterator or start_display are called. + * xdisp.c (init_iterator): Don't initialize the reversed_p flag of + the glyph row here. + (tool_bar_height, redisplay_tool_bar, try_window) + (try_window_reusing_current_matrix, try_window_id) + (get_overlay_arrow_glyph_row, display_menu_bar): Initialize the + reversed_p flag of the iterator's glyph row where the glyph row + is going to be redrawn. + +2014-08-16 Paul Eggert + + * xdisp.c (set_horizontal_scroll_bar): Don't use uninitialized local. + +2014-08-16 Martin Rudalics + + * w32term.c (w32_horizontal_scroll_bar_handle_click): In y part + of emacs_event return length from si.nPage to si.nMax. + * xdisp.c (set_horizontal_scroll_bar): For right-to-left text + interchange start and end of thumb. + +2014-08-15 Ken Brown * gmalloc.c (_malloc_mutex, _aligned_blocks_mutex) [CYGWIN]: Use ERRORCHECK mutexes. (Bug#18222) diff --cc test/ChangeLog index dd49d6e782b,90b30a4dd66..7546dd1fb46 --- a/test/ChangeLog +++ b/test/ChangeLog @@@ -1,9 -1,8 +1,14 @@@ -2014-08-18 Glenn Morris ++2014-08-28 Glenn Morris + + * automated/python-tests.el (python-shell-calculate-exec-path-2): + Update test for today's python.el changes. + +2014-08-13 Jan Nieuwenhuizen + + * automated/compile-tests.el (compile--test-error-line): Grok FILE + being nil. Allows for Guile tests to pass. + (compile-tests--test-regexps-data): Add Guile tests. + 2014-08-11 Glenn Morris * automated/data/files-bug18141.el.gz: New file.