(print_error_message): Don't crash if (cdr data) is not a list.

8c29413d · Richard M. Stallman · 8f6df9b5 · 8c29413d
Commit 8c29413d authored Feb 21, 1999 by Richard M. Stallman
Hide whitespace changes
Inline Side-by-side

Showing with 1 addition and 1 deletion

src/print.c src/print.c +1 -1

No files found.
--- a/src/print.c
+++ b/src/print.c
@@ -1054,7 +1054,7 @@ print_error_message (data, stream)

  /* For file-error, make error message by concatenating
     all the data items.  They are all strings.  */
-  if (!NILP (file_error) && !NILP (tail))
+  if (!NILP (file_error) && CONSP (tail))
    errmsg = XCONS (tail)->car, tail = XCONS (tail)->cdr;

  if (STRINGP (errmsg))