From: Richard M. Stallman <rms@gnu.org>
Date: Sat, 28 Apr 2007 17:24:22 +0000 (+0000)
Subject: (read_escape): In a string, \s is always space.
X-Git-Tag: emacs-pretest-23.0.90~12769
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=4d7528d05918fa0b3b40147f7e7b91835482dd47;p=emacs.git

(read_escape): In a string, \s is always space.
---

diff --git a/src/lread.c b/src/lread.c
index 1f1ddddde4f..088f729075d 100644
--- a/src/lread.c
+++ b/src/lread.c
@@ -1894,7 +1894,7 @@ read_escape (readcharfun, stringp, byterep)
 
     case 's':
       c = READCHAR;
-      if (c != '-')
+      if (stringp || c != '-')
 	{
 	  UNREAD (c);
 	  return ' ';