Mercurial > hg > xemacs-beta
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) |