Evaluated proc wiki name { if {[catch "wikipic $name" pic] == 1} { wiki_ $name } { widen $pic 50 } }