summaryrefslogtreecommitdiffstats
path: root/perl-install
diff options
context:
space:
mode:
Diffstat (limited to 'perl-install')
-rw-r--r--perl-install/NEWS2
1 files changed, 1 insertions, 1 deletions
diff --git a/perl-install/NEWS b/perl-install/NEWS
index 919fdf15f..6ed0c86cd 100644
--- a/perl-install/NEWS
+++ b/perl-install/NEWS
@@ -1,4 +1,4 @@
-- add support for "nodiratime" mount option
+- diskdrake: add support for "nodiratime" mount option
- drakxservices: describe a few more services (#18612)
Version 10.4.159 - 06 August 2007, by Thierry Vignaud
generated by cgit v1.2.1 (git 2.21.0) at 2024-12-22 09:53:03 +0000
="hl opt">($service) = @_; if (services::restart($service)) { # CUPS needs some time to come up. wait_for_cups() if $service eq "cups"; return 1; } else { return 0 } } sub start ($) { my ($service) = @_; if (services::start($service)) { # CUPS needs some time to come up. wait_for_cups() if $service eq "cups"; return 1; } else { return 0 } } sub start_not_running_service ($) { my ($service) = @_; # The exit status is not zero when the service is not running if (services::start_not_running_service($service)) { return 0; } else { run_program::rooted($::prefix, "/etc/rc.d/init.d/$service", "start"); if (($? >> 8) != 0) { return 0; } else { # CUPS needs some time to come up. wait_for_cups() if $service eq "cups"; return 1; } } } sub wait_for_cups() { # CUPS needs some time to come up. Wait up to 30 seconds, checking # whether CUPS is ready. my $cupsready = 0; my $i; for ($i = 0; $i < 30; $i++) { # Check whether CUPS is running without any console output system(($::testing ? $::prefix : "chroot $::prefix/ ") . "/usr/bin/lpstat -r >/dev/null 2>&1"); if (($? >> 8) != 0) { # CUPS is not ready, continue