Evaluated proc rempty l { m $l {x {if {$x != ""} {. $x}}} " "}