Mercurial > emacs
diff src/print.c @ 30071:1a26ac604ea4
(print_error_message): If Vsignaling_function is set,
show it in *Messages*.
author | Gerd Moellmann <gerd@gnu.org> |
---|---|
date | Wed, 05 Jul 2000 17:22:52 +0000 |
parents | 5b727419f3aa |
children | 8f4528e244d5 |
line wrap: on
line diff
--- a/src/print.c Wed Jul 05 17:21:29 2000 +0000 +++ b/src/print.c Wed Jul 05 17:22:52 2000 +0000 @@ -888,6 +888,16 @@ tail = Fcdr_safe (data); GCPRO1 (tail); + /* If we know from where the error was signaled, show it in + *Messages*. */ + if (!NILP (Vsignaling_function) && SYMBOLP (Vsignaling_function)) + { + char *name = XSYMBOL (Vsignaling_function)->name->data; + message_dolog (name, strlen (name), 0, 0); + message_dolog (": ", 2, 0, 0); + Vsignaling_function = Qnil; + } + /* For file-error, make error message by concatenating all the data items. They are all strings. */ if (!NILP (file_error) && CONSP (tail))