# HG changeset patch
# User Karoly Lorentey <lorentey@elte.hu>
# Date 1074991727 0
# Node ID 77cfe20c109cbab5ba5f8686c6211461ff396e9f
# Parent  c66ebcc29777ba655fc9634aad8be41ce64a68a8
Fixed unsafe and incorrect use of record_unwind_protect in Fsuspend_emacs.

src/keyboard.c (Fsuspend_emacs): Pass init_all_sys_modes, not
init_sys_modes to record_unwind_protect.

git-archimport-id: lorentey@elte.hu--2004/emacs--multi-tty--0--patch-66

diff -r c66ebcc29777 -r 77cfe20c109c src/keyboard.c
--- a/src/keyboard.c	Sun Jan 25 00:43:38 2004 +0000
+++ b/src/keyboard.c	Sun Jan 25 00:48:47 2004 +0000
@@ -10142,8 +10142,8 @@
   reset_all_sys_modes ();
   /* sys_suspend can get an error if it tries to fork a subshell
      and the system resources aren't available for that.  */
-  record_unwind_protect ((Lisp_Object (*) P_ ((Lisp_Object))) init_sys_modes,
-			 (Lisp_Object)CURTTY()); /* XXX */
+  record_unwind_protect ((Lisp_Object (*) P_ ((Lisp_Object))) init_all_sys_modes,
+			 Qnil);
   stuff_buffered_input (stuffstring);
   if (cannot_suspend)
     sys_subshell ();