Mercurial > emacs
diff lisp/font-lock.el @ 9814:5ae33de679f6
Wrap font-lock-fontify-region's string-match with save-match-data.
author | Simon Marshall <simon@gnu.org> |
---|---|
date | Thu, 03 Nov 1994 15:30:39 +0000 |
parents | d352bebc9103 |
children | ff043fec9153 |
line wrap: on
line diff
--- a/lisp/font-lock.el Wed Nov 02 06:18:45 1994 +0000 +++ b/lisp/font-lock.el Thu Nov 03 15:30:39 1994 +0000 @@ -343,9 +343,10 @@ ;; In C mode, it is " */" ;; and we don't want to fail to notice a */ ;; just because there's no space there. - (if (string-match "^ +" comment-end) - (substring comment-end (match-end 0)) - comment-end))) + (save-match-data + (if (string-match "^ +" comment-end) + (substring comment-end (match-end 0)) + comment-end)))) "\\s>")) (startline (point)) state prev prevstate)