# HG changeset patch
# User Gerd Moellmann <gerd@gnu.org>
# Date 956862615 0
# Node ID 42f2ded9d9db53e46723946c89bf93e1f2db0d24
# Parent  b04dc1778deea774e7a4df64f5a0316ea6748e84
(read1): Don't treat period followed by certain
characters as symbol start.

diff -r b04dc1778dee -r 42f2ded9d9db src/lread.c
--- a/src/lread.c	Thu Apr 27 19:09:58 2000 +0000
+++ b/src/lread.c	Thu Apr 27 19:10:15 2000 +0000
@@ -2165,7 +2165,8 @@
 	int next_char = READCHAR;
 	UNREAD (next_char);
 
-	if (next_char <= 040)
+	if (next_char <= 040
+	    || index ("\"'`,(", next_char))
 	  {
 	    *pch = c;
 	    return Qnil;