mirror/emacs
1
0
Fork 0
mirror of https://git.savannah.gnu.org/git/emacs.git synced 2025-01-13 16:38:14 +00:00
Code Issues Releases Activity

(comint-mode): Don't set `font-lock-defaults'.

Browse Source 
(comint-mode-hook): Turn on font-lock by default.
This commit is contained in:
Miles Bader 2002-06-13 09:28:48 +00:00
parent 76bc6ee386
commit fcc6fa5153
2 changed files with 6 additions and 3 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

5
lisp/ChangeLog
View File

@ -1,3 +1,8 @@
2002-06-13 Miles Bader <miles@gnu.org>
* comint.el (comint-mode): Don't set `font-lock-defaults'.
(comint-mode-hook): Turn on font-lock by default.
2002-06-12 Karl Fogel <kfogel@red-bean.com>
* bookmark.el (bookmark-file-or-variation-thereof): Restore

4
lisp/comint.el
View File

@ -384,7 +384,7 @@ field boundaries in a natural way)."
: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 @@ Entry to this mode runs the hooks on `comint-mode-hook'."
(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))