changeset 80808:d741e1d7761a

(read_escape): In a string, \s is always space.
author Richard M. Stallman <rms@gnu.org>
date Sat, 28 Apr 2007 17:24:22 +0000
parents b08b48a824ad
children 958471f534b7
files src/lread.c
diffstat 1 files changed, 1 insertions(+), 1 deletions(-) [+]
line wrap: on
line diff
--- a/src/lread.c	Sat Apr 28 09:24:38 2007 +0000
+++ b/src/lread.c	Sat Apr 28 17:24:22 2007 +0000
@@ -1894,7 +1894,7 @@
 
     case 's':
       c = READCHAR;
-      if (c != '-')
+      if (stringp || c != '-')
 	{
 	  UNREAD (c);
 	  return ' ';