diff options
author | Eli Zaretskii <eliz@gnu.org> | 2019-03-07 16:19:00 +0200 |
---|---|---|
committer | Eli Zaretskii <eliz@gnu.org> | 2019-03-07 16:19:00 +0200 |
commit | 953cbce77be9a8da1cbf0ca5ee6442923478e186 (patch) | |
tree | 578ee0cc4c4314df07913d5b790ab89ab50a123b /lisp/emacs-lisp | |
parent | a0b2a5ad9ec8186b679ee80e1c5b9786672344a0 (diff) | |
parent | 3fd2100bff58008b1eaf48922539d914c6ce6c16 (diff) | |
download | emacs-953cbce77be9a8da1cbf0ca5ee6442923478e186.tar.gz emacs-953cbce77be9a8da1cbf0ca5ee6442923478e186.tar.bz2 emacs-953cbce77be9a8da1cbf0ca5ee6442923478e186.zip |
Merge branch 'master' of git.savannah.gnu.org:/srv/git/emacs
Diffstat (limited to 'lisp/emacs-lisp')
-rw-r--r-- | lisp/emacs-lisp/regexp-opt.el | 6 |
1 files changed, 3 insertions, 3 deletions
diff --git a/lisp/emacs-lisp/regexp-opt.el b/lisp/emacs-lisp/regexp-opt.el index 4404b905a6f..fce6a47d989 100644 --- a/lisp/emacs-lisp/regexp-opt.el +++ b/lisp/emacs-lisp/regexp-opt.el @@ -84,7 +84,7 @@ ;;; Code: ;;;###autoload -(defun regexp-opt (strings &optional paren noreorder) +(defun regexp-opt (strings &optional paren keep-order) "Return a regexp to match a string in the list STRINGS. Each string should be unique in STRINGS and should not contain any regexps, quoted or not. Optional PAREN specifies how the @@ -114,7 +114,7 @@ nil necessary to ensure that a postfix operator appended to it will apply to the whole expression. -The optional argument NOREORDER, if nil or omitted, allows the +The optional argument KEEP-ORDER, if nil or omitted, allows the returned regexp to match the strings in any order. If non-nil, the match is guaranteed to be performed in the order given, as if the strings were made into a regexp by joining them with the @@ -149,7 +149,7 @@ usually more efficient than that of a simplified version: (concat (or open "\\(?:") "a\\`\\)")) ;; If we cannot reorder, give up all attempts at ;; optimisation. There is room for improvement (Bug#34641). - ((and noreorder (regexp-opt--contains-prefix sorted-strings)) + ((and keep-order (regexp-opt--contains-prefix sorted-strings)) (concat (or open "\\(?:") (mapconcat #'regexp-quote strings "\\|") "\\)")) |