Evaluated proc seen who { set t 0; set c {}; foreach line [log] { if {[second $line] == $who} {set t [first $line]; set c [last $line]} }; if { $t == 0 } {. no record of $who} {. [^C]14last seen[^C] [^B][duration [- [timestamp] $t]][^B][^C]14 ago saying [^C][^B]$c} }