diff src/lread.c @ 67394:f18c2431b06b

(read_escape) <\s>: Don't treat strings specially.
author Richard M. Stallman <rms@gnu.org>
date Thu, 08 Dec 2005 17:43:52 +0000
parents cb58edf068f2
children 998f4ca6948d 39bb10ce301a
line wrap: on
line diff
--- a/src/lread.c	Thu Dec 08 17:43:14 2005 +0000
+++ b/src/lread.c	Thu Dec 08 17:43:52 2005 +0000
@@ -1738,13 +1738,12 @@
       return c | alt_modifier;
 
     case 's':
-      if (stringp)
-	return ' ';
       c = READCHAR;
-      if (c != '-') {
-	UNREAD (c);
-	return ' ';
-      }
+      if (c != '-')
+	{
+	  UNREAD (c);
+	  return ' ';
+	}
       c = READCHAR;
       if (c == '\\')
 	c = read_escape (readcharfun, 0, byterep);