From 78e8097c578fb334c7440a5459fdb7aecc827feb Mon Sep 17 00:00:00 2001
From: Pascal Rigaux <pixel@mandriva.com>
Date: Thu, 14 Nov 2002 17:36:32 +0000
Subject: - add/remove spaces to make perl_checker happy - remove redundant
 parentheses - add some parentheses for clarity

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

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

diff --git a/perl-install/devices.pm b/perl-install/devices.pm
index 32c52904c..20e5c157b 100644
--- a/perl-install/devices.pm
+++ b/perl-install/devices.pm
@@ -27,7 +27,7 @@ sub size($) {
     for ($high = 1; $high > 0 && &$valid_offset($high); $high *= 2) { $low = $high }
 
     while ($low < $high - 1) {
-	$mid = int ($low + $high) / 2;
+	$mid = int(($low + $high) / 2);
 	&$valid_offset($mid) ? $low : $high = $mid;
     }
     $low + 1;
-- 
cgit v1.2.1