From 7e9373f483bef385a19971641eb0cc69a1f5c503 Mon Sep 17 00:00:00 2001
From: Pascal Rigaux <pixel@mandriva.com>
Date: Mon, 29 Jul 2002 16:17:27 +0000
Subject: try harder to have "xfs" running

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

(limited to 'perl-install/Xconfig/test.pm')

diff --git a/perl-install/Xconfig/test.pm b/perl-install/Xconfig/test.pm
index 4c011d175..3c70e7dab 100644
--- a/perl-install/Xconfig/test.pm
+++ b/perl-install/Xconfig/test.pm
@@ -38,7 +38,7 @@ sub test {
     }
 
     #- ensure xfs is running
-    fuzzy_pidofs(qr/\bxfs\b/) or run_program::rooted($::prefix, "/etc/rc.d/init.d/xfs", "start");
+    fuzzy_pidofs(qr/\bxfs\b/) or do { run_program::rooted($::prefix, "/etc/rc.d/init.d/xfs", $_) foreach 'stop', 'start' };
     fuzzy_pidofs(qr/\bxfs\b/) or die "xfs is not running";
 
     my $f = $::testing ? $tmpconfig : "/etc/X11/XF86Config.test";
-- 
cgit v1.2.1