mirror of
git://git.sv.gnu.org/emacs.git
synced 2025-12-15 10:30:25 -08:00
Assume font-lock-mode variable is not void
* lisp/align.el (align-rules-list): * lisp/cedet/semantic/idle.el (semantic-idle-summary-useful-context-p): * lisp/org/org-table.el (org-table-edit-field): * lisp/org/org.el (org-restart-font-lock): * lisp/progmodes/antlr-mode.el (antlr-language-option-extra): * lisp/progmodes/idlwave.el (idlwave-choose): * lisp/progmodes/sql.el (sql-product-font-lock): * lisp/progmodes/verilog-mode.el (verilog-save-font-no-change-functions, verilog-preprocess): * lisp/vc/cvs-status.el: * lisp/vc/smerge-mode.el (smerge-mode): * lisp/woman.el (woman-decode-buffer): Assume font-lock-mode variable is not void; it is preloaded.
This commit is contained in:
parent
a92167674f
commit
bbe88cd82e
11 changed files with 12 additions and 17 deletions
|
|
@ -2047,7 +2047,7 @@ Called in PHASE `after-insertion', see `antlr-options-alists'."
|
|||
(let ((new-language (antlr-language-option t)))
|
||||
(or (null new-language)
|
||||
(eq new-language antlr-language)
|
||||
(let ((font-lock (and (boundp 'font-lock-mode) font-lock-mode)))
|
||||
(let ((font-lock font-lock-mode))
|
||||
(if font-lock (font-lock-mode 0))
|
||||
(antlr-mode)
|
||||
(and font-lock (null font-lock-mode) (font-lock-mode 1)))))))
|
||||
|
|
|
|||
Loading…
Add table
Add a link
Reference in a new issue