[Emacs-diffs] Changes to emacs/lisp/font-lock.el

[Richard M . Stallman]

Index: emacs/lisp/font-lock.el
diff -c emacs/lisp/font-lock.el:1.233 emacs/lisp/font-lock.el:1.234
*** emacs/lisp/font-lock.el:1.233       Sun Mar  6 00:02:04 2005
--- emacs/lisp/font-lock.el     Thu Mar 17 23:44:19 2005
***************
*** 292,297 ****
--- 292,303 ----
                 (other :tag "always" t)
                 (integer :tag "size"))
    :group 'font-lock)
+ 
+ (defcustom font-lock-lines-before 1
+   "*Number of lines before the changed text to include in refontification."
+   :type 'integer
+   :group 'font-lock
+   :version "22.1")
  
  
  ;; Originally these variable values were face names such as `bold' etc.
***************
*** 1062,1068 ****
        (save-match-data
        ;; Rescan between start of lines enclosing the region.
        (font-lock-fontify-region
!        (progn (goto-char beg) (beginning-of-line) (point))
         (progn (goto-char end) (forward-line 1) (point)))))))
  
  (defun font-lock-fontify-block (&optional arg)
--- 1068,1075 ----
        (save-match-data
        ;; Rescan between start of lines enclosing the region.
        (font-lock-fontify-region
!        (progn (goto-char beg)
!               (forward-line (- font-lock-lines-before)) (point))
         (progn (goto-char end) (forward-line 1) (point)))))))
  
  (defun font-lock-fontify-block (&optional arg)