# HG changeset patch
# User Miles Bader <miles@gnu.org>
# Date 1023960515 0
# Node ID 552d3de9e9ed9de9640c5c1a038163898e6358d9
# Parent  4bcea799d0bda8818029505596ad54b4caa656fa
(comint-mode): Don't set `font-lock-defaults'.
(comint-mode-hook): Turn on font-lock by default.

diff -r 4bcea799d0bd -r 552d3de9e9ed lisp/comint.el
--- a/lisp/comint.el	Wed Jun 12 21:44:33 2002 +0000
+++ b/lisp/comint.el	Thu Jun 13 09:28:35 2002 +0000
@@ -384,7 +384,7 @@
   :type 'boolean
   :group 'comint)
 
-(defcustom comint-mode-hook '()
+(defcustom comint-mode-hook '(turn-on-font-lock)
   "Called upon entry into `comint-mode'
 This is run before the process is cranked up."
   :type 'hook
@@ -507,8 +507,6 @@
   (make-local-variable 'comint-file-name-chars)
   (make-local-variable 'comint-file-name-quote-list)
   (set (make-local-variable 'comint-accum-marker) (make-marker))
-  (set (make-local-variable 'font-lock-defaults)
-       '(nil t nil nil nil (font-lock-core-only . t)))
   ;; This behavior is not useful in comint buffers, and is annoying
   (set (make-local-variable 'next-line-add-newlines) nil))