From e66787e8ef47e098c04ea5595ad745304955d34d Mon Sep 17 00:00:00 2001 From: Olivier Blin Date: Tue, 23 Oct 2007 17:21:55 +0000 Subject: drakclock/finish-install: disable DPMS and screensaver when setting time not to blank monitor (#17031) --- perl-install/standalone/drakclock | 2 ++ 1 file changed, 2 insertions(+) (limited to 'perl-install/standalone') diff --git a/perl-install/standalone/drakclock b/perl-install/standalone/drakclock index e34980807..d9d046a66 100755 --- a/perl-install/standalone/drakclock +++ b/perl-install/standalone/drakclock @@ -103,6 +103,7 @@ $my_win->{window}->add(gtknew('VBox', border_width => $::isEmbedded ? 0 : 5, chi cancel_clicked => sub { ugtk2->exit(0) }, ok_clicked => sub { my $need_date = 1; + any::disable_x_screensaver(); if ($check_ntp->get_active) { my $choosed_serv = $combo_ntpserver->entry->get_text; $choosed_serv =~ s/^[^:]+: (.+)/$1/; @@ -141,6 +142,7 @@ $my_win->{window}->add(gtknew('VBox', border_width => $::isEmbedded ? 0 : 5, chi join('', map { print_it0($_) } ($month, $day, $hour, $min, $year)) . '.' . print_it0($sec)); } -e '/sbin/hwclock' and system('/sbin/hwclock --systohc'); + any::enable_x_screensaver(); system("dcop kicker Panel restart") if $ENV{DESKTOP} eq 'kde'; ugtk2->exit(0); }, -- cgit v1.2.1