window inits help --- suggestion

[barmar@Think.COM (Barry Margolin)]

    Date: Wed, 12 Sep 90 16:25 EDT
    From: pan@Athena.Pangaro.Dialnet.Symbolics.Com (Paul Pangaro)

	Date: Wed, 12 Sep 90 15:31:47 EDT
	From: sims@starbase.MITRE.ORG (Jim Sims)

	 Is there a way to force ANY windows that get created after booting
	(forever!) to be initialized with :deexposed-typeout-action :permit?
	Seems like a trivial thing, but...

	jim

    Nothing is trivial that has to be done twice:

      (loop for (name window) in (tv:selectable-windows tv:main-screen)
	    do (send-if-handles window :set-deexposed-typeout-action :permit)
	       (send-if-handles window :set-deexposed-typein-action  :notify)
	       (send-if-handles window :set-more-p nil))

That only affects windows that exist at the time you run it.  He wants
to change the default for future windows as well.

Some users here use a patch that does this specifically for Terminal
windows, since this is generally the most annoying case (if you start a
program that produces continuous output in a terminal window, and then
bury the window, you get an immediate output notification, and
eventually the network connection is likely to block).  They have a
version of the defflavor for TELNET:NVT-WINDOW that specifies the
appropriate initial value for TV:DEEXPOSED-TYPEOUT-ACTION.  The problem
with this is that the flavor definition has changed with every release
(and most ECOs, as well), so this patch needs to be updated each time.

                                                barmar