Evaluated proc smile {} {regsub -all {:} [fg e "Doh"] \u2588}