Evaluated proc unlist list { string map {\{ "" \} ""} $list }