$mw->idletasks;         # this line is crucial 
$mw->iconimage($icon);