Fix bad whitespace

2009-02-09 01:16:23 -06:00 · 2009-02-09 01:16:23 -06:00 · 45e8d14a1f
parent 7b8e7f8092
commit 45e8d14a1f
1 changed files with 1 additions and 1 deletions
--- a/basis/listener/listener.factor
+++ b/basis/listener/listener.factor
@ -18,7 +18,7 @@ GENERIC: stream-read-quot ( stream -- quot/f )
        [ 2drop f ] [ rethrow ] if
    ] recover ;

-: read-quot-loop  ( stream accum -- quot/f )
+: read-quot-loop ( stream accum -- quot/f )
    over stream-readln dup [
        over push
        dup read-quot-step dup