From b082edafe4d175867d280317ed3dbe6e28ccfefa Mon Sep 17 00:00:00 2001 From: Till Kamppeter Date: Fri, 14 Sep 2001 15:12:14 +0000 Subject: Made network checking working on non-english systems. --- perl-install/printer.pm | 4 ++-- 1 file changed, 2 insertions(+), 2 deletions(-) (limited to 'perl-install/printer.pm') diff --git a/perl-install/printer.pm b/perl-install/printer.pm index aba21b392..6594641f7 100644 --- a/perl-install/printer.pm +++ b/perl-install/printer.pm @@ -145,7 +145,7 @@ sub service_starts_on_boot ($) { my ($service) = @_; local *F; open F, ($::testing ? "$prefix" : "chroot $prefix/ ") . - "/sbin/chkconfig --list $service 2>&1 |" || + "/bin/sh -c \"export LC_ALL=C; /sbin/chkconfig --list $service 2>&1\" |" || die "Could not run chkconfig!"; while () { chomp; @@ -169,7 +169,7 @@ sub network_status { # return 0, otherwise 1. local *F; open F, ($::testing ? "$prefix" : "chroot $prefix/ ") . - "/etc/rc.d/init.d/network status |" || + "/bin/sh -c \"export LC_ALL=C; /etc/rc.d/init.d/network status\" |" || die "Could not run \"/etc/rc.d/init.d/network status\"!"; while() { if (($_ =~ /Devices.*down/) || # Are there configured devices which -- cgit v1.2.1