Re: exit in EDT emulation

[David Gressett <gresset1@xxxxxxxxxxx>]

At 02:46 PM 10/21/2002 -0400, John E. Davis wrote:
> David Gressett <gresset1@xxxxxxxxxxx> wrote:
> >The new  exit intrinsic (#45 in the changes list) has broken the exit
> >command that have been using for years to exit jed in EDT emulation.
>
> Hmm...  Do you type exit at the mini-buffer prompt?
>
> If so, then put the following in your .jedrc file AFTER loading edt
> keybindings:
>
>    define edt_evaluate_cmd ()
>    {
>        cmd = strtrim (read_mini ("EDT:", "", ""));
>        if (cmd == "exit")
>          cmd = "exit_jed";
>        eval (cmd);
>    }
>    setkey ("\eOP\eOw");
>
> Does this give you the desired behavior?

I get a message that tells me that cmd is not defined.

If I fix that by putting
  variable cmd;
in as the first line of edt_evaluate_cmd()
I get a different message when jed starts:

S-Lang Error: Stack Underflow: called from line 2, file:  ***string***