Evaluated proc +pics {who link} {aa irc_pics [string toupper $who] $link; void}