diff options
author | Dmitry Gutov <dgutov@yandex.ru> | 2020-12-18 04:05:18 +0200 |
---|---|---|
committer | Dmitry Gutov <dgutov@yandex.ru> | 2020-12-18 04:05:18 +0200 |
commit | fa4c2768cf6cf670e4c7af0c2b74ad139e65aad4 (patch) | |
tree | 7c10d32ed6650f0790721487d23d8a4ed868a489 /lisp/progmodes | |
parent | 5ada3eecec79703a84e2f2c38cae16ef4b2600cc (diff) | |
download | emacs-fa4c2768cf6cf670e4c7af0c2b74ad139e65aad4.tar.gz emacs-fa4c2768cf6cf670e4c7af0c2b74ad139e65aad4.tar.bz2 emacs-fa4c2768cf6cf670e4c7af0c2b74ad139e65aad4.zip |
flymake-diag-region: Fix the recent test breakage
* lisp/progmodes/flymake.el (flymake-diag-region):
Make sure to save the match data (bug#29193).
Diffstat (limited to 'lisp/progmodes')
-rw-r--r-- | lisp/progmodes/flymake.el | 3 |
1 files changed, 2 insertions, 1 deletions
diff --git a/lisp/progmodes/flymake.el b/lisp/progmodes/flymake.el index 6c3e0a19819..da026da86a2 100644 --- a/lisp/progmodes/flymake.el +++ b/lisp/progmodes/flymake.el @@ -438,7 +438,8 @@ region is invalid." (let* ((beg (progn (forward-char (1- col)) (point))) (sexp-end (or (ignore-errors (end-of-thing 'sexp)) - (ignore-errors (end-of-thing 'symbol)))) + (save-match-data + (ignore-errors (end-of-thing 'symbol))))) (end (or (and sexp-end (not (= sexp-end beg)) sexp-end) |