From 0b65c752cb972ec75c2a7c58c3b2f40f5ec2c6fe Mon Sep 17 00:00:00 2001
From: =?UTF-8?q?Fr=C3=A9d=C3=A9ric=20Buclin?= <LpSolit@gmail.com>
Date: Mon, 23 May 2011 00:46:59 +0200
Subject: [PATCH] Bug 648096: UWinnipeg (theory PPM repo) instructions are not
 necessary with recent ActiveState releases r=mkanat a=LpSolit

---
 Bugzilla/Install/Requirements.pm | 5 ++---
 1 file changed, 2 insertions(+), 3 deletions(-)

diff --git a/Bugzilla/Install/Requirements.pm b/Bugzilla/Install/Requirements.pm
index 1f1ef436d..5f276bf25 100644
--- a/Bugzilla/Install/Requirements.pm
+++ b/Bugzilla/Install/Requirements.pm
@@ -545,9 +545,8 @@ sub print_module_instructions {
           or ($output and $check_results->{any_missing}) ) ? 1 : 0;
 
     # We only print the PPM repository note if we have to.
-    if ($need_module_instructions and ON_ACTIVESTATE) {
-        my $perl_ver = sprintf('%vd', $^V);
-            
+    my $perl_ver = sprintf('%vd', $^V);
+    if ($need_module_instructions && ON_ACTIVESTATE && vers_cmp($perl_ver, '5.12') < 0) {
         # URL when running Perl 5.8.x.
         my $url_to_theory58S = 'http://theoryx5.uwinnipeg.ca/ppms';
         # Packages for Perl 5.10 are not compatible with Perl 5.8.
-- 
2.24.1