🚀 go-pugleaf

As it appears that many people didn't quite understand my original
post, here is some clarification:

In article <1992Nov16.221022.67@dymaxion.ns.ca>, bg@dymaxion.ns.ca writes:
> Would someone please post a patch to the EVE routines which will
> prevent informational messages from being displayed in the messages
> window for settings saved via the "SAVE EXTENDED EVE" command.  They
> really bug me.

I'm talking about the following messages:


Default select behavior is now active.
Box operations will now overstrike your buffer.
The cursor is now bound to the flow of your text.
Default command file is undefined.
Default section file is undefined.
Editor will not check for modified attributes on exit.
Pending delete disabled.
Prompting for section file enabled.
Tab mode set to insert a TAB character.
Tabs will no longer be visible.

All of these messages flash by rapidly (or not so rapidly at 2400
baud) at the beginning of an editing session which uses my saved
section file.  The messages are annoying and furthermore obilterate
any useful messages which may have been displayed at the start of
the session, like:

Editing new file.  Could not find: BG.TMP

The procedure which creates my new section file looks like this:

	SET KEYPAD EDT
	SET CURSOR BOUND
	SET NOEXIT ATTRIBUTE CHECK
	INCLUDE DYULIB:DSPELL.TPU
	INCLUDE DYULIB:GETFRO.TPU
	INCLUDE DYULIB:FILBAR.TPU
	INCLUDE DYULIB:OUTSEL.TPU
	INCLUDE DYULIB:MARGIN.TPU

	TPU COMPILE(current_buffer)
	TPU DEFINE_KEY("dy_getfile_ronly",CTRL_G_KEY)
	TPU DEFINE_KEY("dy_getfile_ronly",KEY_NAME("G",SHIFT_KEY))
	TPU DEFINE_KEY("eve_spell",KEY_NAME("S",SHIFT_KEY))
	TPU DEFINE_KEY("vertical_bar",FS_KEY)
	TPU DEFINE_KEY("output_select",KEY_NAME("O",SHIFT_KEY))
	TPU DEFINE_KEY("tilde_bar",RS_KEY)
	TPU DEFINE_KEY("right_70",KEY_NAME("7",SHIFT_KEY))
	TPU DEFINE_KEY("right_80",KEY_NAME("8",SHIFT_KEY))

	SAVE EXTENDED EVE DYM$DISK:[DYMAX.205000]TPUEDT.NEW

I never had a problem with the extra messages appearing until
I added the lines:

	SET CURSOR BOUND
	SET NOEXIT ATTRIBUTE CHECK

Ben.
---
Ben Armstrong, Software Development                  bus: (902)422-1973
Dymaxion Research Ltd.,                              fax: (902)421-1267
Halifax, Nova Scotia, Canada B3J 1R2            Internet: bg@dymaxion.ns.ca