# HG changeset patch
# User Richard M. Stallman <rms@gnu.org>
# Date 822462021 0
# Node ID a8bd2aaa0d8ce2e24ac7607a932fccbcd90b1a3d
# Parent  9bc9be522a4d06c5abe2ca513e83f9492c280e88
(turn-on-font-lock): Test window-system.

diff -r 9bc9be522a4d -r a8bd2aaa0d8c lisp/font-lock.el
--- a/lisp/font-lock.el	Tue Jan 23 18:56:15 1996 +0000
+++ b/lisp/font-lock.el	Wed Jan 24 05:40:21 1996 +0000
@@ -411,8 +411,9 @@
 
 ;;;###autoload
 (defun turn-on-font-lock ()
-  "Unconditionally turn on Font Lock mode."
-  (font-lock-mode 1))
+  "Turn on Font Lock mode, if the terminal can display it."
+  (if window-system
+      (font-lock-mode 1)))
 
 ;;;###autoload
 (defun font-lock-fontify-buffer ()