Wrap font-lock-fontify-region's string-match with save-match-data.

1 files changed, 4 insertions, 3 deletions

diff --git a/lisp/font-lock.el b/lisp/font-lock.el
index a1b6df6537c..2b204bfedf8 100644
--- a/lisp/font-lock.el
+++ b/lisp/font-lock.el
@@ -343,9 +343,10 @@ the face is also set; its value is the face name."
 			       ;; 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)