aboutsummaryrefslogtreecommitdiffstats
path: root/src/lread.c
diff options
context:
space:
mode:
Diffstat (limited to 'src/lread.c')
-rw-r--r--src/lread.c11
1 files changed, 5 insertions, 6 deletions
diff --git a/src/lread.c b/src/lread.c
index 234fbe6e395..e6f1987a50b 100644
--- a/src/lread.c
+++ b/src/lread.c
@@ -1739,13 +1739,12 @@ read_escape (readcharfun, stringp, byterep)
1739 return c | alt_modifier; 1739 return c | alt_modifier;
1740 1740
1741 case 's': 1741 case 's':
1742 if (stringp)
1743 return ' ';
1744 c = READCHAR; 1742 c = READCHAR;
1745 if (c != '-') { 1743 if (c != '-')
1746 UNREAD (c); 1744 {
1747 return ' '; 1745 UNREAD (c);
1748 } 1746 return ' ';
1747 }
1749 c = READCHAR; 1748 c = READCHAR;
1750 if (c == '\\') 1749 if (c == '\\')
1751 c = read_escape (readcharfun, 0, byterep); 1750 c = read_escape (readcharfun, 0, byterep);