factor: remove extra whitespace

[factor.git] / extra / modern / html / html.factor

diff --git a/extra/modern/html/html.factor b/extra/modern/html/html.factor
index 04c6957c08941cc5aee44f3bde9170459a502b17..4fa21011a8bd0bbe416ceac53d2b7f792c1b3794 100644 (file)
--- a/extra/modern/html/html.factor
+++ b/extra/modern/html/html.factor
@@ -201,7 +201,7 @@ ERROR: unmatched-closing-tag-error stack tag ;
         stack name unmatched-closing-tag-error
     ] if* ;
 
-: lex-html ( stack n string -- stack n' string  )
+: lex-html ( stack n string -- stack n' string )
     "<" slice-til-either {
         { CHAR: < [
             1 split-slice-back [ >string f like [ reach push ] when* ] dip