GNU Emacs is free software; you can redistribute it and/or modify
it under the terms of the GNU General Public License as published by
-the Free Software Foundation; either version 2, or (at your option)
+the Free Software Foundation; either version 3, or (at your option)
any later version.
GNU Emacs is distributed in the hope that it will be useful,
real_this_command= save_real_this_command;
current_kboard->Vlast_command = save_last_command;
- single_kboard_state ();
- return apply1 (function, specs);
+ temporarily_switch_to_single_kboard (NULL);
+ return unbind_to (speccount, apply1 (function, specs));
}
/* Here if function specifies a string to control parsing the defaults */
real_this_command= save_real_this_command;
current_kboard->Vlast_command = save_last_command;
- single_kboard_state ();
-
{
Lisp_Object val;
specbind (Qcommand_debug_status, Qnil);
+ temporarily_switch_to_single_kboard (NULL);
val = Ffuncall (count + 1, args);
UNGCPRO;
return unbind_to (speccount, val);