summaryrefslogtreecommitdiffstats
path: root/perl-install/standalone/drakclock
diff options
context:
space:
mode:
Diffstat (limited to 'perl-install/standalone/drakclock')
-rwxr-xr-xperl-install/standalone/drakclock14
1 files changed, 7 insertions, 7 deletions
diff --git a/perl-install/standalone/drakclock b/perl-install/standalone/drakclock
index d9d046a66..ad7378aea 100755
--- a/perl-install/standalone/drakclock
+++ b/perl-install/standalone/drakclock
@@ -112,13 +112,13 @@ $my_win->{window}->add(gtknew('VBox', border_width => $::isEmbedded ? 0 : 5, chi
return;
}
timezone::set_ntp_server($choosed_serv);
- system("/sbin/chkconfig --level 35 ntpd on");
- system("service ntpd stop");
+ system(qw(/sbin/chkconfig --level 35 ntpd on));
+ system(qw(service ntpd stop));
#verify that we have a valid hostname (thx sam)
$choosed_serv =~ s/[^-a-zA-Z0-9.]//g;
if (!system("/usr/sbin/ntpdate", $choosed_serv)) {
update_time(); #- get the new time before updating the hwclock
- system("service ntpd start");
+ system(qw(service ntpd start));
$need_date = 0;
} else {
$in->ask_from_no_check({
@@ -130,8 +130,8 @@ $my_win->{window}->add(gtknew('VBox', border_width => $::isEmbedded ? 0 : 5, chi
}
} else {
if (-e $ntpdlock) {
- system("service ntpd stop");
- system("/sbin/chkconfig --level 35 ntpd off");
+ system(qw(service ntpd stop));
+ system(qw(/sbin/chkconfig --level 35 ntpd off));
}
}
if ($need_date) {
@@ -141,9 +141,9 @@ $my_win->{window}->add(gtknew('VBox', border_width => $::isEmbedded ? 0 : 5, chi
system("date " .
join('', map { print_it0($_) } ($month, $day, $hour, $min, $year)) . '.' . print_it0($sec));
}
- -e '/sbin/hwclock' and system('/sbin/hwclock --systohc');
+ -e '/sbin/hwclock' and system('/sbin/hwclock', '--systohc');
any::enable_x_screensaver();
- system("dcop kicker Panel restart") if $ENV{DESKTOP} eq 'kde';
+ system(qw(dcop kicker Panel restart)) if $ENV{DESKTOP} eq 'kde';
ugtk2->exit(0);
},
},