Mercurial > hg > xemacs-beta

comparison lisp/font-lock.el @ 335:54f7aa390f4f r21-0-65

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
Import from CVS: tag r21-0-65
author cvs
date Mon, 13 Aug 2007 10:50:39 +0200
parents 9ea74add5d37
children 8e84bee8ddd0
comparison
equal deleted inserted replaced
334:58353925ad93 335:54f7aa390f4f
1535 (defun font-lock-revert-setup () 1535 (defun font-lock-revert-setup ()
1536 (setq font-lock-fontified nil)) 1536 (setq font-lock-fontified nil))
1537 1537
1538 ;; If the buffer has just been reverted, normally that turns off 1538 ;; If the buffer has just been reverted, normally that turns off
1539 ;; Font Lock mode. So turn the mode back on if necessary. 1539 ;; Font Lock mode. So turn the mode back on if necessary.
1540 (defalias 'font-lock-revert-cleanup 'turn-on-font-lock) 1540 ;; sb 1999-03-03 -- The above comment no longer appears to be operative as
1541 ;; the first call to normal-mode *will* restore the font-lock state and
1542 ;; this call forces a second font-locking to occur when reverting a buffer,
1543 ;; which is wasteful at best.
1544 ;(defalias 'font-lock-revert-cleanup 'turn-on-font-lock)
1545 (defun font-lock-revert-cleanup ())
1541 1546
1542 1547
1543 ;; Various functions. 1548 ;; Various functions.
1544 1549
1545 (defun font-lock-compile-keywords (&optional keywords) 1550 (defun font-lock-compile-keywords (&optional keywords)