]> git.eshelyaron.com Git - emacs.git/commitdiff
Change font-lock-extend-region-multiline handling in mhtml-mode
authorTom Tromey <tom@tromey.com>
Sat, 25 Nov 2017 19:11:21 +0000 (12:11 -0700)
committerTom Tromey <tom@tromey.com>
Sat, 25 Nov 2017 20:25:37 +0000 (13:25 -0700)
Bug#29159
* lisp/textmodes/mhtml-mode.el (mhtml-mode): Remove
font-lock-extend-region-multiline from
font-lock-extend-region-functions.
(mhtml--extend-font-lock-region): Call font-lock-extend-region-multiline.

lisp/textmodes/mhtml-mode.el

index 8df251276b50042088c7b407e2fe445c509bb8e1..09da155f4871d3b7a44297ac46f7d6a462c242c8 100644 (file)
@@ -198,6 +198,12 @@ smallest."
                   (get-text-property orig-end 'mhtml-submode))
         (cl-decf font-lock-end)))
 
+    ;; Also handle the multiline property -- but handle it here, and
+    ;; not via font-lock-extend-region-functions, to avoid the
+    ;; situation where the two extension functions disagree.
+    ;; See bug#29159.
+    (font-lock-extend-region-multiline)
+
     (or (/= font-lock-beg orig-beg)
         (/= font-lock-end orig-end))))
 
@@ -365,8 +371,7 @@ the rules from `css-mode'."
   (setq-local font-lock-fontify-region-function
               #'mhtml--submode-fontify-region)
   (setq-local font-lock-extend-region-functions
-              '(mhtml--extend-font-lock-region
-                font-lock-extend-region-multiline))
+              '(mhtml--extend-font-lock-region))
 
   ;; Attach this to both pre- and post- hooks just in case it ever
   ;; changes a key binding that might be accessed from the menu bar.