aboutsummaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
authorTom Tromey2017-10-29 13:03:51 -0600
committerTom Tromey2017-10-29 13:03:51 -0600
commit056587c45fd964c0367e970c52914260977f889d (patch)
tree3b727e30e78bd829a06518ad4dc7c1761bda2a42
parent4c4ad8084872937776783bc1e59908114ec8f44c (diff)
downloademacs-056587c45fd964c0367e970c52914260977f889d.tar.gz
emacs-056587c45fd964c0367e970c52914260977f889d.zip
Extend mhtml submode region when in comment
* lisp/textmodes/mhtml-mode.el (mhtml-syntax-propertize): Extend submode when start happens to be in a comment.
-rw-r--r--lisp/textmodes/mhtml-mode.el4
1 files changed, 1 insertions, 3 deletions
diff --git a/lisp/textmodes/mhtml-mode.el b/lisp/textmodes/mhtml-mode.el
index 2c1b26d571c..58541677509 100644
--- a/lisp/textmodes/mhtml-mode.el
+++ b/lisp/textmodes/mhtml-mode.el
@@ -293,9 +293,7 @@ can function properly.")
293 (unless (bobp) 293 (unless (bobp)
294 (let ((submode (get-text-property (1- (point)) 'mhtml-submode))) 294 (let ((submode (get-text-property (1- (point)) 'mhtml-submode)))
295 (if submode 295 (if submode
296 ;; Don't search in a comment or string 296 (mhtml--syntax-propertize-submode submode end)
297 (unless (syntax-ppss-context (syntax-ppss))
298 (mhtml--syntax-propertize-submode submode end))
299 ;; No submode, so do what sgml-mode does. 297 ;; No submode, so do what sgml-mode does.
300 (sgml-syntax-propertize-inside end)))) 298 (sgml-syntax-propertize-inside end))))
301 (funcall 299 (funcall