comparison lisp/font-lock.el @ 394:7d59cb494b73 r21-2-12

Import from CVS: tag r21-2-12
author cvs
date Mon, 13 Aug 2007 11:11:37 +0200
parents 8626e4521993
children 74fd4e045ea6
comparison
equal deleted inserted replaced
393:2e030b8965b1 394:7d59cb494b73
1534 (defun font-lock-revert-setup () 1534 (defun font-lock-revert-setup ()
1535 (setq font-lock-fontified nil)) 1535 (setq font-lock-fontified nil))
1536 1536
1537 ;; If the buffer has just been reverted, normally that turns off 1537 ;; If the buffer has just been reverted, normally that turns off
1538 ;; Font Lock mode. So turn the mode back on if necessary. 1538 ;; Font Lock mode. So turn the mode back on if necessary.
1539 (defalias 'font-lock-revert-cleanup 'turn-on-font-lock) 1539 ;; sb 1999-03-03 -- The above comment no longer appears to be operative as
1540 ;; the first call to normal-mode *will* restore the font-lock state and
1541 ;; this call forces a second font-locking to occur when reverting a buffer,
1542 ;; which is wasteful at best.
1543 ;(defalias 'font-lock-revert-cleanup 'turn-on-font-lock)
1544 (defun font-lock-revert-cleanup ())
1540 1545
1541 1546
1542 ;; Various functions. 1547 ;; Various functions.
1543 1548
1544 (defun font-lock-compile-keywords (&optional keywords) 1549 (defun font-lock-compile-keywords (&optional keywords)