Fix problem with outputting error messages while dumping Emacs
* src/print.c (print_error_message): Don't call substitute-command-keys while bootstrapping.
This commit is contained in:
parent
b421e086ca
commit
1428962590
1 changed files with 7 additions and 1 deletions
|
@ -941,7 +941,13 @@ print_error_message (Lisp_Object data, Lisp_Object stream, const char *context,
|
|||
else
|
||||
{
|
||||
Lisp_Object error_conditions = Fget (errname, Qerror_conditions);
|
||||
errmsg = call1 (Qsubstitute_command_keys, Fget (errname, Qerror_message));
|
||||
/* Calling `substitute-command-keys' while bootstrapping will make
|
||||
Emacs exit, so don't do that. */
|
||||
if (will_bootstrap_p () || will_dump_p ())
|
||||
errmsg = Fget (errname, Qerror_message);
|
||||
else
|
||||
errmsg = call1 (Qsubstitute_command_keys,
|
||||
Fget (errname, Qerror_message));
|
||||
file_error = Fmemq (Qfile_error, error_conditions);
|
||||
}
|
||||
|
||||
|
|
Loading…
Add table
Reference in a new issue