From 4d37bebbb47db98088c70d4d4395ca29cef35f8a Mon Sep 17 00:00:00 2001
From: Pascal Rigaux <pixel@mandriva.com>
Date: Tue, 29 Feb 2000 23:50:14 +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 57a78a9df..819528033 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 { [/(\S+)/, /:on/ ] } sort `$cmd chkconfig --list`;
+    my @services = map { log::l ("services: $_"); [/(\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