--- gforth/kernel/saccept.fs	2003/08/25 14:17:54	1.8
+++ gforth/kernel/saccept.fs	2006/02/25 18:28:12	1.9
@@ -25,7 +25,7 @@ require ./io.fs
   BEGIN
    key dup #del = IF drop #bs THEN
    dup bl u<
-   IF	dup #cr = over #lf = or IF space drop nip swap - EXIT THEN
+   IF	dup #cr = over #lf = or IF  space drop nip swap - EXIT THEN
 	#bs = IF 3 pick over <> 
     	IF 1 chars - #bs emit bl emit #bs emit ELSE bell THEN THEN
    ELSE	>r 2dup <> IF r> dup emit over c! char+ ELSE r> drop bell THEN