Commit 111c181e authored by Gerd Moellmann's avatar Gerd Moellmann
Browse files

(font-lock-default-fontify-region): Fix last

change.
parent 3b6936cc
2001-01-19 Gerd Moellmann <gerd@gnu.org> 2001-01-19 Gerd Moellmann <gerd@gnu.org>
   
* font-lock.el (font-lock-default-fontify-region): Fix last
change.
* font-lock.el (font-lock-multiline): Default to nil. * font-lock.el (font-lock-multiline): Default to nil.
(font-lock-default-fontify-region): If font-lock-multiline is (font-lock-default-fontify-region): If font-lock-multiline is
nil, don't check the property `font-lock-multiline'. nil, don't check the property `font-lock-multiline'.
......
...@@ -1212,10 +1212,10 @@ The value of this variable is used when Font Lock mode is turned on." ...@@ -1212,10 +1212,10 @@ The value of this variable is used when Font Lock mode is turned on."
(point-min))) (point-min)))
(goto-char beg) (goto-char beg)
(setq beg (line-beginning-position))) (setq beg (line-beginning-position)))
(setq end (or (and font-lock-multiline (when font-lock-multiline
(text-property-any end (point-max) (setq end (or (text-property-any end (point-max)
'font-lock-multiline nil)) 'font-lock-multiline nil)
(point-max))) (point-max))))
(goto-char end) (goto-char end)
(setq end (line-beginning-position 2)) (setq end (line-beginning-position 2))
;; Now do the fontification. ;; Now do the fontification.
......
Markdown is supported
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment