Evaluated proc kkk {} {set out ""; foreach line [lreverse [log 50]] { if {[second $line] == "kloeri"} {append out "<@kloeri> [last $line]\n"} }; . $out }