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