mirrors/emacs
1
Fork 0
mirror of git://git.sv.gnu.org/emacs.git synced 2026-04-28 01:00:52 -07:00
Code Issues Projects Releases Wiki Activity

(shut_down_emacs): New arg STUFF. Stuff input here.

Browse source 
(Fkill_emacs, fatal_error_signal): Pass new arg.

(main) [GETPGRP_NO_ARG]: Really pass no arg to getpgrp.
This commit is contained in:
Richard M. Stallman 1993-06-13 02:06:51 +00:00
parent 1cd2d6d402
commit f7ab4e3d35
1 changed files with 7 additions and 4 deletions
Download patch file Download diff file Expand all files Collapse all files

11
src/emacs.c
View file

@ -135,7 +135,7 @@ fatal_error_signal (sig)
{
fatal_error_in_progress = 1;
shut_down_emacs (sig, 0);
shut_down_emacs (sig, 0, Qnil);
}
#ifdef VMS
@ -301,7 +301,7 @@ main (argc, argv, envp)
#ifdef BSD
{
#ifdef GETPGRP_NO_ARG
inherited_pgroup = getpgrp (0);
inherited_pgroup = getpgrp ();
#else /* THISSENTENCE_NO_VERB */
inherited_pgroup = getpgrp (0);
#endif
@ -652,7 +652,6 @@ all of which are called before Emacs is actually killed.")
/* #ifdef VMS
stop_vms_input ();
#endif */
stuff_buffered_input (arg);
shut_down_emacs (0, 0);
@ -677,9 +676,11 @@ all of which are called before Emacs is actually killed.")
This is called by fatal signal handlers, X protocol error handlers,
and Fkill_emacs. */
void
shut_down_emacs (sig, no_x)
shut_down_emacs (sig, no_x, stuff)
int sig, no_x;
Lisp_Object stuff;
{
/* If we are controlling the terminal, reset terminal modes */
#ifdef EMACS_HAVE_TTY_PGRP
@ -703,6 +704,8 @@ shut_down_emacs (sig, no_x)
reset_sys_modes ();
#endif
stuff_buffered_input (stuff);
kill_buffer_processes (Qnil);
Fdo_auto_save (Qt, Qnil);