From d473127a69e2c74f29b8092d6f6145e6423b3c77 Mon Sep 17 00:00:00 2001 From: Olivier Blin Date: Fri, 10 Jun 2005 05:21:07 +0000 Subject: -use services; - remove check_started, its return isn't used --- drakpxelinux.pl | 13 ++----------- 1 file changed, 2 insertions(+), 11 deletions(-) (limited to 'drakpxelinux.pl') diff --git a/drakpxelinux.pl b/drakpxelinux.pl index 13586a5..0352e51 100644 --- a/drakpxelinux.pl +++ b/drakpxelinux.pl @@ -31,6 +31,7 @@ use lib qw(/usr/lib/libDrakX); use standalone; use strict; use common; +use services; use network::network; use network::pxe; use network::tools; @@ -712,14 +713,6 @@ sub memlinux_prep() { } } -sub check_started { - my ($service) = @_; - my ($isrunning) = chomp_(`pidof $service`) =~ /(\d+)/m; - if (!$isrunning) { - return 1; - } -} - # main procedure to setup PXE server sub do_it_pxe() { return if $::testing; @@ -753,9 +746,7 @@ EOF enable_tftps(); tftp_blksize('N'); - system("service $_ restart") foreach qw(xinetd pxe); - undef $w; - check_started($_) foreach qw(xinetd pxe); + services::enable($_) foreach qw(xinetd pxe); } # add colum to model -- cgit v1.2.1