From 26a387d5919bba9ccdb8a8447daa114204a997c4 Mon Sep 17 00:00:00 2001
From: Pascal Rigaux <pixel@mandriva.com>
Date: Sun, 5 Mar 2000 22:43:46 +0000
Subject: no_comment

---
 perl-install/services.pm | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

(limited to 'perl-install/services.pm')

diff --git a/perl-install/services.pm b/perl-install/services.pm
index 819528033..d43867268 100644
--- a/perl-install/services.pm
+++ b/perl-install/services.pm
@@ -72,7 +72,7 @@ xfs => __("Starts and stops the X Font Server at boot time and shutdown."),
 sub drakxservices {
     my ($in, $prefix) = @_;
     my $cmd = $prefix ? "chroot $prefix" : "";
-    my @services = map { log::l ("services: $_"); [/(\S+)/, /:on/ ] } sort `LANGUAGE=C $cmd chkconfig --list`;
+    my @services = map { [/(\S+)/, /:on/ ] } sort `LANGUAGE=C $cmd chkconfig --list`;
     my @l      = map { $_->[0] } @services;
     my @before = map { $_->[1] } @services;
     my @descr  = map {
-- 
cgit v1.2.1