summaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
-rwxr-xr-xclock.pl4
1 files changed, 2 insertions, 2 deletions
diff --git a/clock.pl b/clock.pl
index b30fe649..5472c0e5 100755
--- a/clock.pl
+++ b/clock.pl
@@ -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) }));