Evaluated proc twitcentre str { if {[nlines $str] == 1} { return "\n \n$str\n " } { return $str } }