# HG changeset patch
# User Richard M. Stallman <rms@gnu.org>
# Date 908916978 0
# Node ID ce7900230b171856e8b79ff96a30346778c8598c
# Parent  79b17414969fbbc43a611a1b6c8707472b20e872
(syms_of_syntax): Fix the setup of Qscan_error.

diff -r 79b17414969f -r ce7900230b17 src/syntax.c
--- a/src/syntax.c	Tue Oct 20 19:38:09 1998 +0000
+++ b/src/syntax.c	Tue Oct 20 20:56:18 1998 +0000
@@ -2795,7 +2795,7 @@
   Qscan_error = intern ("scan-error");
   staticpro (&Qscan_error);
   Fput (Qscan_error, Qerror_conditions,
-	Fcons (Qerror, Qnil));
+	Fcons (Qscan_error, Fcons (Qerror, Qnil)));
   Fput (Qscan_error, Qerror_message,
 	build_string ("Scan error"));