From de473fdd37b4cc9816b037036addc659a6c41a8b Mon Sep 17 00:00:00 2001 From: damien Date: Sun, 4 Mar 2001 03:56:10 +0000 Subject: updated --- clock.pm | 5 +++-- 1 file changed, 3 insertions(+), 2 deletions(-) (limited to 'clock.pm') diff --git a/clock.pm b/clock.pm index eb890b59..0eaad013 100755 --- a/clock.pm +++ b/clock.pm @@ -111,10 +111,8 @@ $button_reset->signal_connect ( clicked => sub { $button_reset->set_sensitive(0); }); $bbox->add($button_reset); -$button_reset->set_sensitive(0); $window->show_all; -$timer=Gtk->timeout_add(120, sub { time_to_rad(localtime(time)); Repaint($drawing_area) }); Gtk->main_iteration while Gtk->events_pending; $calendar->realize; @@ -123,9 +121,12 @@ $old_year += 1900; $calendar->select_month($old_month, $old_year); $calendar->select_day($old_day); $::isEmbedded and kill USR2, $::CCPID; +$button_reset->set_sensitive(0); +$timer=Gtk->timeout_add(120, sub { time_to_rad(localtime(time)); Repaint($drawing_area) }); Gtk->main; sub cal_changed { + $timer and Gtk->timeout_remove($timer); $button_reset->set_sensitive(1); } -- cgit v1.2.1