From xemacs-m  Mon Apr 21 05:47:39 1997
Received: from altair.xemacs.org (steve@xemacs.miranova.com [206.190.83.19])
	by xemacs.org (8.8.5/8.8.5) with ESMTP id FAA16561
	for <xemacs-beta@xemacs.org>; Mon, 21 Apr 1997 05:47:38 -0500 (CDT)
Received: (from steve@localhost)
	by altair.xemacs.org (8.8.5/8.8.5) id EAA27896;
	Mon, 21 Apr 1997 04:00:50 -0700
Mail-Copies-To: never
To: xemacs-beta@xemacs.org
Subject: [20.2-b1] Too much customization in comint.el
X-Url: http://www.miranova.com/%7Esteve/
X-Face: #!T9!#9s-3o8)*uHlX{Ug[xW7E7Wr!*L46-OxqMu\xz23v|R9q}lH?cRS{rCNe^'[`^sr5"
 f8*@r4ipO6Jl!:Ccq<xoV[Qz2u8<8-+Vwf2gzJ44lf_/y9OaQ`@#Q65{U4/TC)i2`~/M&QI$X>p:9I
 OSS'2{-)-4wBnVeg0S\O4Al@)uC[pD|+
X-Attribution: sb
From: Steven L Baur <steve@miranova.com>
Mime-Version: 1.0 (generated by tm-edit 7.106)
Content-Type: text/plain; charset=US-ASCII
Date: 21 Apr 1997 04:00:48 -0700
Message-ID: <m2k9lwr673.fsf@altair.xemacs.org>
Lines: 35
X-Mailer: Gnus v5.4.45/XEmacs 20.2(beta2)

Beware of some bad custom-ization in comint.el if you're working in a
MULE environment.  This is going to lead to the same kinds of problems
we've had with 19.14 typified by an added-behind-the-scenes hyperbole
hook sneaking into stuff saved by Save Options.

Index: lisp/comint/comint.el
===================================================================
RCS file: /usr/local/xemacs/xemacs-20.0/lisp/comint/comint.el,v
retrieving revision 1.5
diff -u -r1.5 comint.el
--- comint.el	1997/04/19 23:20:49	1.5
+++ comint.el	1997/04/21 10:47:39
@@ -371,14 +371,14 @@
   :type 'hook
   :group 'comint)
 
-(defcustom comint-exec-hook '()
+;; This is initialized by the various language environments, do not
+;; Custom-ize it.
+(defvar comint-exec-hook '()
   "Called each time a process is exec'd by `comint-exec'.
 This is called after the process is cranked up.  It is useful for things that
 must be done each time a process is executed in a comint mode buffer (e.g.,
 `(process-kill-without-query)').  In contrast, the `comint-mode-hook' is only
-executed once when the buffer is created."
-  :type 'hook
-  :group 'comint)
+executed once when the buffer is created.")
 
 (defvar comint-mode-map nil)
 

-- 
steve@miranova.com baur
Unsolicited commercial e-mail will be billed at $250/message.

