format-using: remove an extra space character

diff --git a/extra/format-using/format-using.factor b/extra/format-using/format-using.factor
index aeff7d669e33f0bcec2b66d7ace6caa0d2a61af1..4b685a3110c3011a9506bb877b1846da68737310 100644 (file)
--- a/extra/format-using/format-using.factor
+++ b/extra/format-using/format-using.factor
@@ -25,7 +25,7 @@ IN: format-using
     [ first ] [ second ] bi* + too-long? ;
 
 : cost+ ( cost1 cost2 -- total-cost )
-    [ first3 ] bi@ roll prepend [ 2nip +  dup 3 - ] dip 3array ;
+    [ first3 ] bi@ roll prepend [ 2nip + dup 3 - ] dip 3array ;
 
 : cluster? ( cost -- ? )
     last length 1 > ; inline