Evaluated proc racro acro { set t [$::acro_template]; return [rpick [lindex $t [strlen $acro]]]  }