diff options
Diffstat (limited to 'lisp/emacs-lisp')
38 files changed, 18 insertions, 50 deletions
diff --git a/lisp/emacs-lisp/advice.el b/lisp/emacs-lisp/advice.el index 2034f33d0e6..dfd6d2e5b8f 100644 --- a/lisp/emacs-lisp/advice.el +++ b/lisp/emacs-lisp/advice.el @@ -3,7 +3,6 @@ ;; Copyright (C) 1993-1994, 2000-2019 Free Software Foundation, Inc. ;; Author: Hans Chalupsky <hans@cs.buffalo.edu> -;; Maintainer: emacs-devel@gnu.org ;; Created: 12 Dec 1992 ;; Keywords: extensions, lisp, tools ;; Package: emacs diff --git a/lisp/emacs-lisp/avl-tree.el b/lisp/emacs-lisp/avl-tree.el index d2a3a131d16..a1739562f6f 100644 --- a/lisp/emacs-lisp/avl-tree.el +++ b/lisp/emacs-lisp/avl-tree.el @@ -6,7 +6,6 @@ ;; Inge Wallin <inge@lysator.liu.se> ;; Thomas Bellman <bellman@lysator.liu.se> ;; Toby Cubitt <toby-predictive@dr-qubit.org> -;; Maintainer: emacs-devel@gnu.org ;; Created: 10 May 1991 ;; Keywords: extensions, data structures, AVL, tree diff --git a/lisp/emacs-lisp/backquote.el b/lisp/emacs-lisp/backquote.el index 5e72dc3b400..344a0ba8f61 100644 --- a/lisp/emacs-lisp/backquote.el +++ b/lisp/emacs-lisp/backquote.el @@ -4,7 +4,6 @@ ;; Inc. ;; Author: Rick Sladkey <jrs@world.std.com> -;; Maintainer: emacs-devel@gnu.org ;; Keywords: extensions, internal ;; Package: emacs diff --git a/lisp/emacs-lisp/byte-opt.el b/lisp/emacs-lisp/byte-opt.el index 44cca6136c0..02a9749f47a 100644 --- a/lisp/emacs-lisp/byte-opt.el +++ b/lisp/emacs-lisp/byte-opt.el @@ -4,7 +4,6 @@ ;; Author: Jamie Zawinski <jwz@lucid.com> ;; Hallvard Furuseth <hbf@ulrik.uio.no> -;; Maintainer: emacs-devel@gnu.org ;; Keywords: internal ;; Package: emacs diff --git a/lisp/emacs-lisp/byte-run.el b/lisp/emacs-lisp/byte-run.el index 842d1d48b45..811b485dc6f 100644 --- a/lisp/emacs-lisp/byte-run.el +++ b/lisp/emacs-lisp/byte-run.el @@ -4,7 +4,6 @@ ;; Author: Jamie Zawinski <jwz@lucid.com> ;; Hallvard Furuseth <hbf@ulrik.uio.no> -;; Maintainer: emacs-devel@gnu.org ;; Keywords: internal ;; Package: emacs diff --git a/lisp/emacs-lisp/bytecomp.el b/lisp/emacs-lisp/bytecomp.el index e76baf5ed0d..95e287c806c 100644 --- a/lisp/emacs-lisp/bytecomp.el +++ b/lisp/emacs-lisp/bytecomp.el @@ -5,7 +5,6 @@ ;; Author: Jamie Zawinski <jwz@lucid.com> ;; Hallvard Furuseth <hbf@ulrik.uio.no> -;; Maintainer: emacs-devel@gnu.org ;; Keywords: lisp ;; Package: emacs diff --git a/lisp/emacs-lisp/cconv.el b/lisp/emacs-lisp/cconv.el index 58ca9d5f57e..21af4b6e631 100644 --- a/lisp/emacs-lisp/cconv.el +++ b/lisp/emacs-lisp/cconv.el @@ -3,7 +3,6 @@ ;; Copyright (C) 2011-2019 Free Software Foundation, Inc. ;; Author: Igor Kuzmin <kzuminig@iro.umontreal.ca> -;; Maintainer: emacs-devel@gnu.org ;; Keywords: lisp ;; Package: emacs diff --git a/lisp/emacs-lisp/cl-indent.el b/lisp/emacs-lisp/cl-indent.el index 10af440008d..ea6efbf851d 100644 --- a/lisp/emacs-lisp/cl-indent.el +++ b/lisp/emacs-lisp/cl-indent.el @@ -4,7 +4,6 @@ ;; Author: Richard Mlynarik <mly@eddie.mit.edu> ;; Created: July 1987 -;; Maintainer: emacs-devel@gnu.org ;; Keywords: lisp, tools ;; Package: emacs diff --git a/lisp/emacs-lisp/cl-macs.el b/lisp/emacs-lisp/cl-macs.el index c4a1dcb8baa..24e79acfa55 100644 --- a/lisp/emacs-lisp/cl-macs.el +++ b/lisp/emacs-lisp/cl-macs.el @@ -2597,8 +2597,9 @@ rather than all at the end (i.e. like `let*' rather than like `let')." ;;;###autoload (defmacro cl-callf (func place &rest args) "Set PLACE to (FUNC PLACE ARGS...). -FUNC should be an unquoted function name. PLACE may be a symbol, -or any generalized variable allowed by `setf'." +FUNC should be an unquoted function name or a lambda expression. +PLACE may be a symbol, or any generalized variable allowed by +`setf'." (declare (indent 2) (debug (cl-function place &rest form))) (gv-letplace (getter setter) place (let* ((rargs (cons getter args))) diff --git a/lisp/emacs-lisp/debug.el b/lisp/emacs-lisp/debug.el index 8989aa07196..259f240d297 100644 --- a/lisp/emacs-lisp/debug.el +++ b/lisp/emacs-lisp/debug.el @@ -3,7 +3,6 @@ ;; Copyright (C) 1985-1986, 1994, 2001-2019 Free Software Foundation, ;; Inc. -;; Maintainer: emacs-devel@gnu.org ;; Keywords: lisp, tools, maint ;; This file is part of GNU Emacs. diff --git a/lisp/emacs-lisp/derived.el b/lisp/emacs-lisp/derived.el index 6db0584b987..9f7beeaef51 100644 --- a/lisp/emacs-lisp/derived.el +++ b/lisp/emacs-lisp/derived.el @@ -5,7 +5,6 @@ ;; Inc. ;; Author: David Megginson (dmeggins@aix1.uottawa.ca) -;; Maintainer: emacs-devel@gnu.org ;; Keywords: extensions ;; Package: emacs diff --git a/lisp/emacs-lisp/disass.el b/lisp/emacs-lisp/disass.el index 3fc22247fa6..ed3c1fbaa94 100644 --- a/lisp/emacs-lisp/disass.el +++ b/lisp/emacs-lisp/disass.el @@ -4,7 +4,6 @@ ;; Author: Doug Cutting <doug@csli.stanford.edu> ;; Jamie Zawinski <jwz@lucid.com> -;; Maintainer: emacs-devel@gnu.org ;; Keywords: internal ;; This file is part of GNU Emacs. diff --git a/lisp/emacs-lisp/edebug.el b/lisp/emacs-lisp/edebug.el index ab5553b4e83..b8da76ccf0b 100644 --- a/lisp/emacs-lisp/edebug.el +++ b/lisp/emacs-lisp/edebug.el @@ -4,7 +4,6 @@ ;; Inc. ;; Author: Daniel LaLiberte <liberte@holonexus.org> -;; Maintainer: emacs-devel@gnu.org ;; Keywords: lisp, tools, maint ;; This file is part of GNU Emacs. diff --git a/lisp/emacs-lisp/eldoc.el b/lisp/emacs-lisp/eldoc.el index 188d99e14cb..23f303bc28a 100644 --- a/lisp/emacs-lisp/eldoc.el +++ b/lisp/emacs-lisp/eldoc.el @@ -3,7 +3,7 @@ ;; Copyright (C) 1996-2019 Free Software Foundation, Inc. ;; Author: Noah Friedman <friedman@splode.com> -;; Maintainer: friedman@splode.com +;; Maintainer: Noah Friedman <friedman@splode.com> ;; Keywords: extensions ;; Created: 1995-10-06 diff --git a/lisp/emacs-lisp/elp.el b/lisp/emacs-lisp/elp.el index f0dcb51af89..1f8d31a3fcc 100644 --- a/lisp/emacs-lisp/elp.el +++ b/lisp/emacs-lisp/elp.el @@ -4,7 +4,6 @@ ;; Foundation, Inc. ;; Author: Barry A. Warsaw -;; Maintainer: emacs-devel@gnu.org ;; Created: 26-Feb-1994 ;; Keywords: debugging lisp tools diff --git a/lisp/emacs-lisp/ewoc.el b/lisp/emacs-lisp/ewoc.el index c33b46501ff..597afdd66f2 100644 --- a/lisp/emacs-lisp/ewoc.el +++ b/lisp/emacs-lisp/ewoc.el @@ -4,7 +4,7 @@ ;; Author: Per Cederqvist <ceder@lysator.liu.se> ;; Inge Wallin <inge@lysator.liu.se> -;; Maintainer: monnier@gnu.org +;; Maintainer: Stefan Monnier <monnier@gnu.org> ;; Created: 3 Aug 1992 ;; Keywords: extensions, lisp diff --git a/lisp/emacs-lisp/float-sup.el b/lisp/emacs-lisp/float-sup.el index 54c8afe62b4..6ee378e8528 100644 --- a/lisp/emacs-lisp/float-sup.el +++ b/lisp/emacs-lisp/float-sup.el @@ -2,7 +2,6 @@ ;; Copyright (C) 1985-1987, 2001-2019 Free Software Foundation, Inc. -;; Maintainer: emacs-devel@gnu.org ;; Keywords: internal ;; Package: emacs diff --git a/lisp/emacs-lisp/helper.el b/lisp/emacs-lisp/helper.el index d1bd46fb584..4a84cfa3e2d 100644 --- a/lisp/emacs-lisp/helper.el +++ b/lisp/emacs-lisp/helper.el @@ -3,7 +3,6 @@ ;; Copyright (C) 1985, 2001-2019 Free Software Foundation, Inc. ;; Author: K. Shane Hartman -;; Maintainer: emacs-devel@gnu.org ;; Keywords: help ;; Package: emacs diff --git a/lisp/emacs-lisp/lisp-mnt.el b/lisp/emacs-lisp/lisp-mnt.el index 91c76158a31..81adbd5d4f1 100644 --- a/lisp/emacs-lisp/lisp-mnt.el +++ b/lisp/emacs-lisp/lisp-mnt.el @@ -4,7 +4,6 @@ ;; Inc. ;; Author: Eric S. Raymond <esr@snark.thyrsus.com> -;; Maintainer: emacs-devel@gnu.org ;; Created: 14 Jul 1992 ;; Keywords: docs ;; X-Bogus-Bureaucratic-Cruft: Gruad will get you if you don't watch out! diff --git a/lisp/emacs-lisp/lisp-mode.el b/lisp/emacs-lisp/lisp-mode.el index fa6dc98d04c..021708c588a 100644 --- a/lisp/emacs-lisp/lisp-mode.el +++ b/lisp/emacs-lisp/lisp-mode.el @@ -2,7 +2,6 @@ ;; Copyright (C) 1985-1986, 1999-2019 Free Software Foundation, Inc. -;; Maintainer: emacs-devel@gnu.org ;; Keywords: lisp, languages ;; Package: emacs diff --git a/lisp/emacs-lisp/lisp.el b/lisp/emacs-lisp/lisp.el index 38df920f17a..f653f6c1099 100644 --- a/lisp/emacs-lisp/lisp.el +++ b/lisp/emacs-lisp/lisp.el @@ -3,7 +3,6 @@ ;; Copyright (C) 1985-1986, 1994, 2000-2019 Free Software Foundation, ;; Inc. -;; Maintainer: emacs-devel@gnu.org ;; Keywords: lisp, languages ;; Package: emacs diff --git a/lisp/emacs-lisp/map-ynp.el b/lisp/emacs-lisp/map-ynp.el index a688330b74a..e8337a99c80 100644 --- a/lisp/emacs-lisp/map-ynp.el +++ b/lisp/emacs-lisp/map-ynp.el @@ -3,7 +3,6 @@ ;; Copyright (C) 1991-1995, 2000-2019 Free Software Foundation, Inc. ;; Author: Roland McGrath <roland@gnu.org> -;; Maintainer: emacs-devel@gnu.org ;; Keywords: lisp, extensions ;; Package: emacs diff --git a/lisp/emacs-lisp/map.el b/lisp/emacs-lisp/map.el index 54e802edf4f..774df3f84e7 100644 --- a/lisp/emacs-lisp/map.el +++ b/lisp/emacs-lisp/map.el @@ -8,8 +8,6 @@ ;; Package-Requires: ((emacs "25")) ;; Package: map -;; Maintainer: emacs-devel@gnu.org - ;; This file is part of GNU Emacs. ;; GNU Emacs is free software: you can redistribute it and/or modify diff --git a/lisp/emacs-lisp/regexp-opt.el b/lisp/emacs-lisp/regexp-opt.el index 00f72e284ad..2753bbd5482 100644 --- a/lisp/emacs-lisp/regexp-opt.el +++ b/lisp/emacs-lisp/regexp-opt.el @@ -3,7 +3,6 @@ ;; Copyright (C) 1994-2019 Free Software Foundation, Inc. ;; Author: Simon Marshall <simon@gnu.org> -;; Maintainer: emacs-devel@gnu.org ;; Keywords: strings, regexps, extensions ;; This file is part of GNU Emacs. diff --git a/lisp/emacs-lisp/ring.el b/lisp/emacs-lisp/ring.el index c7d0268a77f..91c043fb3fb 100644 --- a/lisp/emacs-lisp/ring.el +++ b/lisp/emacs-lisp/ring.el @@ -2,7 +2,6 @@ ;; Copyright (C) 1992, 2001-2019 Free Software Foundation, Inc. -;; Maintainer: emacs-devel@gnu.org ;; Keywords: extensions ;; This file is part of GNU Emacs. diff --git a/lisp/emacs-lisp/rmc.el b/lisp/emacs-lisp/rmc.el index 6d1adae9749..4c90f47c914 100644 --- a/lisp/emacs-lisp/rmc.el +++ b/lisp/emacs-lisp/rmc.el @@ -2,8 +2,6 @@ ;; Copyright (C) 2016-2019 Free Software Foundation, Inc. -;; Maintainer: emacs-devel@gnu.org - ;; This file is part of GNU Emacs. ;; GNU Emacs is free software: you can redistribute it and/or modify diff --git a/lisp/emacs-lisp/rx.el b/lisp/emacs-lisp/rx.el index fdd24317c6a..ed32490ceee 100644 --- a/lisp/emacs-lisp/rx.el +++ b/lisp/emacs-lisp/rx.el @@ -3,7 +3,6 @@ ;; Copyright (C) 2001-2019 Free Software Foundation, Inc. ;; Author: Gerd Moellmann <gerd@gnu.org> -;; Maintainer: emacs-devel@gnu.org ;; Keywords: strings, regexps, extensions ;; This file is part of GNU Emacs. @@ -107,15 +106,16 @@ ;;; Code: (require 'cl-lib) +(require 'cl-extra) ;; FIXME: support macros. (defvar rx-constituents ;Not `const' because some modes extend it. - '((and . (rx-and 1 nil)) + '((and . (rx-and 0 nil)) (seq . and) ; SRE (: . and) ; SRE (sequence . and) ; sregex - (or . (rx-or 1 nil)) + (or . (rx-or 0 nil)) (| . or) ; SRE (not-newline . ".") (nonl . not-newline) ; SRE @@ -391,9 +391,11 @@ FORM is of the form `(and FORM1 ...)'." "Parse and produce code from FORM, which is `(or FORM1 ...)'." (rx-check form) (rx-group-if - (if (memq nil (mapcar 'stringp (cdr form))) - (mapconcat (lambda (x) (rx-form x '|)) (cdr form) "\\|") + (cond + ((null (cdr form)) regexp-unmatchable) + ((cl-every #'stringp (cdr form)) (regexp-opt (cdr form) nil t)) + (t (mapconcat (lambda (x) (rx-form x '|)) (cdr form) "\\|"))) (and (memq rx-parent '(: * t)) rx-parent))) @@ -1122,6 +1124,7 @@ CHAR `(seq SEXP1 SEXP2 ...)' `(sequence SEXP1 SEXP2 ...)' matches what SEXP1 matches, followed by what SEXP2 matches, etc. + Without arguments, matches the empty string. `(submatch SEXP1 SEXP2 ...)' `(group SEXP1 SEXP2 ...)' @@ -1137,7 +1140,7 @@ CHAR `(| SEXP1 SEXP2 ...)' matches anything that matches SEXP1 or SEXP2, etc. If all args are strings, use `regexp-opt' to optimize the resulting - regular expression. + regular expression. Without arguments, never matches anything. `(minimal-match SEXP)' produce a non-greedy regexp for SEXP. Normally, regexps matching diff --git a/lisp/emacs-lisp/seq.el b/lisp/emacs-lisp/seq.el index 3413cd1513c..8997b7501b2 100644 --- a/lisp/emacs-lisp/seq.el +++ b/lisp/emacs-lisp/seq.el @@ -7,8 +7,6 @@ ;; Version: 2.21 ;; Package: seq -;; Maintainer: emacs-devel@gnu.org - ;; This file is part of GNU Emacs. ;; GNU Emacs is free software: you can redistribute it and/or modify diff --git a/lisp/emacs-lisp/subr-x.el b/lisp/emacs-lisp/subr-x.el index b9ffe6a6fc6..33445835aed 100644 --- a/lisp/emacs-lisp/subr-x.el +++ b/lisp/emacs-lisp/subr-x.el @@ -2,7 +2,6 @@ ;; Copyright (C) 2013-2019 Free Software Foundation, Inc. -;; Maintainer: emacs-devel@gnu.org ;; Keywords: convenience ;; Package: emacs diff --git a/lisp/emacs-lisp/syntax.el b/lisp/emacs-lisp/syntax.el index f1904e64efb..f488bed3b0e 100644 --- a/lisp/emacs-lisp/syntax.el +++ b/lisp/emacs-lisp/syntax.el @@ -2,7 +2,6 @@ ;; Copyright (C) 2000-2019 Free Software Foundation, Inc. -;; Maintainer: emacs-devel@gnu.org ;; Keywords: internal ;; This file is part of GNU Emacs. diff --git a/lisp/emacs-lisp/tcover-ses.el b/lisp/emacs-lisp/tcover-ses.el index 29b481849e2..8d2f8217c61 100644 --- a/lisp/emacs-lisp/tcover-ses.el +++ b/lisp/emacs-lisp/tcover-ses.el @@ -2,8 +2,8 @@ ;; Copyright (C) 2002-2019 Free Software Foundation, Inc. -;; Author: Jonathan Yavner <jyavner@engineer.com> -;; Maintainer: Jonathan Yavner <jyavner@engineer.com> +;; Author: Jonathan Yavner <jyavner@member.fsf.org> +;; Maintainer: Jonathan Yavner <jyavner@member.fsf.org> ;; Keywords: spreadsheet lisp utility ;; Package: testcover diff --git a/lisp/emacs-lisp/tcover-unsafep.el b/lisp/emacs-lisp/tcover-unsafep.el index 571f53c7957..daae3ad43bc 100644 --- a/lisp/emacs-lisp/tcover-unsafep.el +++ b/lisp/emacs-lisp/tcover-unsafep.el @@ -2,8 +2,8 @@ ;; Copyright (C) 2002-2019 Free Software Foundation, Inc. -;; Author: Jonathan Yavner <jyavner@engineer.com> -;; Maintainer: Jonathan Yavner <jyavner@engineer.com> +;; Author: Jonathan Yavner <jyavner@member.fsf.org> +;; Maintainer: Jonathan Yavner <jyavner@member.fsf.org> ;; Keywords: safety lisp utility ;; Package: testcover diff --git a/lisp/emacs-lisp/thunk.el b/lisp/emacs-lisp/thunk.el index e1370c45911..968dc71f678 100644 --- a/lisp/emacs-lisp/thunk.el +++ b/lisp/emacs-lisp/thunk.el @@ -7,8 +7,6 @@ ;; Version: 1.0 ;; Package: thunk -;; Maintainer: emacs-devel@gnu.org - ;; This file is part of GNU Emacs. ;; GNU Emacs is free software: you can redistribute it and/or modify diff --git a/lisp/emacs-lisp/timer-list.el b/lisp/emacs-lisp/timer-list.el index 55aa56b72e0..3a791c2af44 100644 --- a/lisp/emacs-lisp/timer-list.el +++ b/lisp/emacs-lisp/timer-list.el @@ -2,7 +2,6 @@ ;; Copyright (C) 2016-2019 Free Software Foundation, Inc. -;; Maintainer: emacs-devel@gnu.org ;; Package: emacs ;; This file is part of GNU Emacs. diff --git a/lisp/emacs-lisp/timer.el b/lisp/emacs-lisp/timer.el index 22ccc35103a..668da42a6ef 100644 --- a/lisp/emacs-lisp/timer.el +++ b/lisp/emacs-lisp/timer.el @@ -2,7 +2,6 @@ ;; Copyright (C) 1996, 2001-2019 Free Software Foundation, Inc. -;; Maintainer: emacs-devel@gnu.org ;; Package: emacs ;; This file is part of GNU Emacs. diff --git a/lisp/emacs-lisp/tq.el b/lisp/emacs-lisp/tq.el index 4249305feee..ca2d2a23c75 100644 --- a/lisp/emacs-lisp/tq.el +++ b/lisp/emacs-lisp/tq.el @@ -4,7 +4,6 @@ ;; Inc. ;; Author: Scott Draves <spot@cs.cmu.edu> -;; Maintainer: emacs-devel@gnu.org ;; Adapted-By: ESR ;; Keywords: extensions diff --git a/lisp/emacs-lisp/trace.el b/lisp/emacs-lisp/trace.el index 2f271c1f708..0a8351195f1 100644 --- a/lisp/emacs-lisp/trace.el +++ b/lisp/emacs-lisp/trace.el @@ -3,7 +3,6 @@ ;; Copyright (C) 1993, 1998, 2000-2019 Free Software Foundation, Inc. ;; Author: Hans Chalupsky <hans@cs.buffalo.edu> -;; Maintainer: emacs-devel@gnu.org ;; Created: 15 Dec 1992 ;; Keywords: tools, lisp diff --git a/lisp/emacs-lisp/warnings.el b/lisp/emacs-lisp/warnings.el index 13ca605dd00..70d6b077ebc 100644 --- a/lisp/emacs-lisp/warnings.el +++ b/lisp/emacs-lisp/warnings.el @@ -2,7 +2,6 @@ ;; Copyright (C) 2002-2019 Free Software Foundation, Inc. -;; Maintainer: emacs-devel@gnu.org ;; Keywords: internal ;; This file is part of GNU Emacs. |