Evaluated proc chats who { join [map [lreverse [log]] {x { if {[second $x] == $who} {. <$who> [second $x]}  }}] \n }