diff options
| author | Lars Ingebrigtsen <larsi@gnus.org> | 2021-10-07 20:46:50 +0200 |
|---|---|---|
| committer | Lars Ingebrigtsen <larsi@gnus.org> | 2021-10-07 20:46:50 +0200 |
| commit | a26824e5cbc454a3614b32d131bbdd74f3c03735 (patch) | |
| tree | 0fc6b627711019d95f9e5ca8aef685257f91fc31 /src/minibuf.c | |
| parent | cb86d1d0def61950a149445cbbde829a30e210c4 (diff) | |
| download | emacs-a26824e5cbc454a3614b32d131bbdd74f3c03735.tar.gz emacs-a26824e5cbc454a3614b32d131bbdd74f3c03735.tar.bz2 emacs-a26824e5cbc454a3614b32d131bbdd74f3c03735.zip | |
Make 'inhibit-changing-match-data' obsolete and adjust callers
* doc/lispref/searching.texi (Regexp Search):
(POSIX Regexps): Document this.
* lisp/subr.el (inhibit-changing-match-data): Make obsolete.
(looking-at-p): Adjust call.
* lisp/vc/vc-hg.el (vc-hg--raw-dirstate-search):
(vc-hg--ignore-patterns-ignored-p):
(vc-hg--cached-dirstate-search): Don't use
`inhibit-changing-match-data'.
* src/minibuf.c (Ftry_completion):
(Fall_completions):
(Ftest_completion): Adjust Fstring_match calls.
* src/search.c (looking_at_1): Pass in modify_data.
(Flooking_at): Add optional inhibit-modify parameter.
(string_match_1): Pass in modify_data.
(Fstring_match):
(Fposix_looking_at, Fposix_string_match): Add optional
inhibit-modify parameter.
Diffstat (limited to 'src/minibuf.c')
| -rw-r--r-- | src/minibuf.c | 6 |
1 files changed, 3 insertions, 3 deletions
diff --git a/src/minibuf.c b/src/minibuf.c index 5455a93f694..0dc340e9670 100644 --- a/src/minibuf.c +++ b/src/minibuf.c @@ -1684,7 +1684,7 @@ is used to further constrain the set of candidates. */) specbind (Qcase_fold_search, completion_ignore_case ? Qt : Qnil); } - tem = Fstring_match (XCAR (regexps), eltstring, zero); + tem = Fstring_match (XCAR (regexps), eltstring, zero, Qnil); if (NILP (tem)) break; } @@ -1948,7 +1948,7 @@ with a space are ignored unless STRING itself starts with a space. */) specbind (Qcase_fold_search, completion_ignore_case ? Qt : Qnil); } - tem = Fstring_match (XCAR (regexps), eltstring, zero); + tem = Fstring_match (XCAR (regexps), eltstring, zero, Qnil); if (NILP (tem)) break; } @@ -2163,7 +2163,7 @@ the values STRING, PREDICATE and `lambda'. */) { /* We can test against STRING, because if we got here, then the element is equivalent to it. */ - if (NILP (Fstring_match (XCAR (regexps), string, Qnil))) + if (NILP (Fstring_match (XCAR (regexps), string, Qnil, Qnil))) return unbind_to (count, Qnil); } unbind_to (count, Qnil); |