From eff67faa909b3b52902c49a2b29cb4b153bf5cad Mon Sep 17 00:00:00 2001
From: Pascal Rigaux <pixel@mandriva.com>
Date: Thu, 29 Aug 2002 14:52:45 +0000
Subject: fix check_hard_drives

---
 perl-install/standalone/drakupdate_fstab | 3 ++-
 1 file changed, 2 insertions(+), 1 deletion(-)

(limited to 'perl-install/standalone')

diff --git a/perl-install/standalone/drakupdate_fstab b/perl-install/standalone/drakupdate_fstab
index 0d5f3c4ff..dbb566322 100755
--- a/perl-install/standalone/drakupdate_fstab
+++ b/perl-install/standalone/drakupdate_fstab
@@ -44,7 +44,8 @@ sub check_hard_drives {
     #- do not do anything if there are many partitions
     #- otherwise we may add main extended partitions
     if ($name =~ s|/part\d+$||) {
-	grep { /part/ } all($name) <= 1;
+	my @parts = grep { /part/ } all($name);
+	@parts <= 1;
     } else {
 	1;
     }
-- 
cgit v1.2.1