diff --git a/basis/listener/listener.factor b/basis/listener/listener.factor
index 4a5209976f..2ee0832269 100644
--- 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