(font-lock-default-fontify-region): Fix last
change.
This commit is contained in:
parent
3b6936cc6d
commit
111c181ec1
2 changed files with 7 additions and 4 deletions
|
@ -1,5 +1,8 @@
|
|||
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-default-fontify-region): If font-lock-multiline is
|
||||
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."
|
|||
(point-min)))
|
||||
(goto-char beg)
|
||||
(setq beg (line-beginning-position)))
|
||||
(setq end (or (and font-lock-multiline
|
||||
(text-property-any end (point-max)
|
||||
'font-lock-multiline nil))
|
||||
(point-max)))
|
||||
(when font-lock-multiline
|
||||
(setq end (or (text-property-any end (point-max)
|
||||
'font-lock-multiline nil)
|
||||
(point-max))))
|
||||
(goto-char end)
|
||||
(setq end (line-beginning-position 2))
|
||||
;; Now do the fontification.
|
||||
|
|
Loading…
Add table
Reference in a new issue