help.markup: remove blank after $code

[factor.git] / basis / help / markup / markup.factor

diff --git a/basis/help/markup/markup.factor b/basis/help/markup/markup.factor
index 3c8ca8a5c0c502cb3ea8eb10257ef4777306caee..37ed5a8ad3a67abdc45eedc53abe33b4190edeef 100644 (file)
--- a/basis/help/markup/markup.factor
+++ b/basis/help/markup/markup.factor
@@ -96,7 +96,7 @@ M: f print-element drop ;
     [
         last-element off
         [ ($code-style) ] dip with-nesting
-    ] ($block) ($blank-line) ; inline
+    ] ($block) ; inline
 
 : $code ( element -- )
     join-lines dup <input> [ write ] ($code) ;