From 22ad938758373ec4e2f8490d62f2cdc237d50d7c Mon Sep 17 00:00:00 2001
From: Pascal Rigaux <pixel@mandriva.com>
Date: Mon, 11 Nov 2002 22:20:22 +0000
Subject: - replace ... =~ 'foo'  with  ... =~ /foo/ - remove unneeded
 parentheses for things like ... if (...)

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

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

diff --git a/perl-install/pkgs.pm b/perl-install/pkgs.pm
index 1f55bed41..f71ceebbc 100644
--- a/perl-install/pkgs.pm
+++ b/perl-install/pkgs.pm
@@ -1094,7 +1094,7 @@ sub install($$$;$$) {
 	    }
 	}
 	cleanHeaders($prefix);
-    } while ($nb > 0 && !$pkgs::cancel_install);
+    } while $nb > 0 && !$pkgs::cancel_install;
 
     closeInstallLog();
 
-- 
cgit v1.2.1