Path: utzoo!mnetor!uunet!seismo!sundc!pitstop!sun!decwrl!labrea!agate!pasteur!ames!ll-xn!mit-eddie!galaxy.UUCP!worley
From: worley@galaxy.UUCP (Dale Worley)
Newsgroups: comp.emacs
Subject: Disable suspend on ^G^G
Message-ID: <8802261611.AA02930@galaxy.compass.com>
Date: 26 Feb 88 16:11:44 GMT
Sender: daemon@eddie.MIT.EDU
Lines: 35

Is there a way to disable the feature of Emacs that is suspends if it
gets two ^G's quickly?  Sometimes I run Emacs without a shell over it,
and so I can't restart it if it suspends.  It's easy enough to disable
suspend-emacs, but I don't see how to inhibit ^G^G.

More...

It looks like one would have to define a variable "never-suspend" that
would inhibit suspending.  Then you'd have to change
interrupt_signal() in keyboard.c:

  Echo1 = 0;

  /* is this a second quit before we've processed the first? */
>>if (!NULL (Vquit_flag))
    {
      fflush (stdout);

to:

  if (!NULL (Vquit_flag) && !NULL (Vnever_suspend))

and at the top of suspend-emacs in keyboard.c, you'd have to add:

  if (!NULL (Vnever_suspend))
    {
      Ding ();
      return Qnil;
    }

Of course, this would only be useful if you were running Emacs under a
window system, or some such, so that you had an external means of
aborting it if it jammed up.

Dale (think!compass!worley@eddie.mit.edu)