diff options
author | Florent Villard <warly@mandriva.com> | 2004-09-01 04:27:46 +0000 |
---|---|---|
committer | Florent Villard <warly@mandriva.com> | 2004-09-01 04:27:46 +0000 |
commit | 7c95efc21d7ba8c0f973fcd7320cdda3a9ddb724 (patch) | |
tree | b0e39e511fe7374d1c6a8fcc68319682b3a02aca /perl-install | |
parent | 4b17169e2015ec678c4d5b0b5b0f6d64ca16348f (diff) | |
download | drakx-7c95efc21d7ba8c0f973fcd7320cdda3a9ddb724.tar drakx-7c95efc21d7ba8c0f973fcd7320cdda3a9ddb724.tar.gz drakx-7c95efc21d7ba8c0f973fcd7320cdda3a9ddb724.tar.bz2 drakx-7c95efc21d7ba8c0f973fcd7320cdda3a9ddb724.tar.xz drakx-7c95efc21d7ba8c0f973fcd7320cdda3a9ddb724.zip |
initialize and so that motion_event correctly handle the mouse moves
Diffstat (limited to 'perl-install')
-rwxr-xr-x | perl-install/standalone/drakclock | 5 |
1 files changed, 2 insertions, 3 deletions
diff --git a/perl-install/standalone/drakclock b/perl-install/standalone/drakclock index 191a4d347..1f11a19e6 100755 --- a/perl-install/standalone/drakclock +++ b/perl-install/standalone/drakclock @@ -17,7 +17,6 @@ my $radius; my ($dRadians_hour, $dRadians_min, $dRadians_sec); my $Radian; my $timer; -my ($midx, $midy); my $first = 1; my $its_reset = 0; @@ -198,8 +197,6 @@ $spinner_s->signal_connect(activate => \&spinned); $spinner_s->signal_connect(scroll_event => \&spinned); $spinner_s->signal_connect(button_release_event => \&spinned); -$my_win->{window}->show_all; - gtkflush(); my $is24 = $h_old > 12; @@ -210,6 +207,8 @@ $button_reset->set_sensitive(0); $timer = Glib::Timeout->add(120, \&update_time); $drawing_area->show; +$my_win->{window}->show_all; +my ($midx, $midy) = ($drawing_area->allocation->width/2, $drawing_area->allocation->height/2); $my_win->main; ugtk2->exit(0); |