Help for this page

Select Code to Download


  1. or download this
        ${$prev_clicked_button} -> after (2000, [\&hide, ${$prev_clicked_b
+utton} ]);
    ${$clicked_button}      -> after (2000, [\&hide, ${$clicked_button
+}]);
  2. or download this
    sub hide {
    shift -> configure (-image => undef);
}