diff options
Diffstat (limited to 'clock.pl')
-rwxr-xr-x | clock.pl | 4 |
1 files changed, 2 insertions, 2 deletions
@@ -30,8 +30,7 @@ my $its_reset = 0; my $my_win = ugtk2->new('print_launcher'); $my_win->{rwindow}->set_title(N("DrakClock")) unless $::isEmbedded; -my $vbox = Gtk2::VBox->new(0,0); -$my_win->{window}->add($vbox); +$my_win->{window}->add(my $vbox = Gtk2::VBox->new(0,0)); $my_win->{window}->signal_connect(delete_event => sub { ugtk2->exit(0) }); my $hbox = Gtk2::HBox->new(0,0); $vbox->pack_start($hbox, 1, 1, 0); @@ -104,6 +103,7 @@ $bbox->add(gtksignal_connect(Gtk2::Button->new(N("OK")), system("date " . join('', map { print_it0($_) } ($month, $day, $hour, $min, $year)) . '.' . print_it0($sec)); -e '/sbin/hwclock' and system('/sbin/hwclock --systohc'); + system("dcop kicker Panel restart") if $ENV{DESKTOP} eq 'kde'; ugtk2->exit(0); })); $bbox->add(gtksignal_connect(Gtk2::Button->new(N("Cancel")), clicked => sub { ugtk2->exit(0) })); |