diff options
| author | Richard M. Stallman | 1996-08-01 21:45:04 +0000 |
|---|---|---|
| committer | Richard M. Stallman | 1996-08-01 21:45:04 +0000 |
| commit | 7ca7485a8a1b03fb8775f1e7c9817823fa24d184 (patch) | |
| tree | 9a882db7aba71ba67fd22cd08f9a132ff3539484 | |
| parent | cd6dfed6c6b353a8ccf17fda63e6650cd039429a (diff) | |
| download | emacs-7ca7485a8a1b03fb8775f1e7c9817823fa24d184.tar.gz emacs-7ca7485a8a1b03fb8775f1e7c9817823fa24d184.zip | |
(font-lock-inhibit-modes): Deleted.
(turn-on-font-lock-if-enabled): Deleted.
| -rw-r--r-- | lisp/font-lock.el | 4 |
1 files changed, 0 insertions, 4 deletions
diff --git a/lisp/font-lock.el b/lisp/font-lock.el index 885a654aae4..fd3ccdc0d1a 100644 --- a/lisp/font-lock.el +++ b/lisp/font-lock.el | |||
| @@ -599,9 +599,6 @@ begins with `not'. For example: | |||
| 599 | (c-mode c++-mode) | 599 | (c-mode c++-mode) |
| 600 | means that Font Lock mode is turned on for buffers in C and C++ modes only.") | 600 | means that Font Lock mode is turned on for buffers in C and C++ modes only.") |
| 601 | 601 | ||
| 602 | (defvar font-lock-inhibit-modes '(lisp-interaction-mode) | ||
| 603 | "Major modes for which Global Font Lock mode should not apply.") | ||
| 604 | |||
| 605 | ;;;###autoload | 602 | ;;;###autoload |
| 606 | (defun global-font-lock-mode (&optional arg message) | 603 | (defun global-font-lock-mode (&optional arg message) |
| 607 | "Toggle Global Font Lock mode. | 604 | "Toggle Global Font Lock mode. |
| @@ -647,7 +644,6 @@ turned on in a buffer if its major mode is one of `font-lock-global-modes'." | |||
| 647 | (set-buffer (car font-lock-buffers)) | 644 | (set-buffer (car font-lock-buffers)) |
| 648 | (if (and (or font-lock-defaults | 645 | (if (and (or font-lock-defaults |
| 649 | (assq major-mode font-lock-defaults-alist)) | 646 | (assq major-mode font-lock-defaults-alist)) |
| 650 | (not (memq major-mode font-lock-inhibit-modes)) | ||
| 651 | (or (eq font-lock-global-modes t) | 647 | (or (eq font-lock-global-modes t) |
| 652 | (if (eq (car-safe font-lock-global-modes) 'not) | 648 | (if (eq (car-safe font-lock-global-modes) 'not) |
| 653 | (not (memq major-mode (cdr font-lock-global-modes))) | 649 | (not (memq major-mode (cdr font-lock-global-modes))) |