Evaluated proc showclip name { set ok [clipart $name]; if {$ok != ""} { set w [magic:loadurl] $ok; save $w } }