blob: 5ca5b4b82621fe4da1c11dc3181a80996636e135 (
plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
|
Fix bug-reference-fontify
Patch backported from emacs-29 branch
https://debbugs.gnu.org/61395
commit 4f053afe8e792c6261d4be0376e2ef0c91353188
Author: Tassilo Horn <tsdh@gnu.org>
Date: Fri Feb 10 19:22:56 2023 +0100
bug-reference: prevent match-data clobbering (bug#61395)
--- emacs-27.2/lisp/progmodes/bug-reference.el
+++ emacs-27.2/lisp/progmodes/bug-reference.el
@@ -110,7 +110,7 @@
(re-search-forward bug-reference-bug-regexp end-line 'move))
(when (or (not bug-reference-prog-mode)
;; This tests for both comment and string syntax.
- (nth 8 (syntax-ppss)))
+ (nth 8 (save-match-data (syntax-ppss))))
(let ((overlay (make-overlay (match-beginning 0) (match-end 0)
nil t nil)))
(overlay-put overlay 'category 'bug-reference)
|