From d23e5801150774c2661a7096a057fea4dae21e70 Mon Sep 17 00:00:00 2001
From: Wouter van Oijen <wouter@webgui-svn>
Date: Sat, 24 Sep 2005 07:46:48 +0000
Subject: [PATCH] fix [ 1302878 ] testEnvironment.pl does not check versions

---
 docs/changelog/6.x.x.txt | 3 +++
 sbin/testEnvironment.pl  | 3 ++-
 2 files changed, 5 insertions(+), 1 deletion(-)

diff --git a/docs/changelog/6.x.x.txt b/docs/changelog/6.x.x.txt
index dcfad1e26..4bcdce010 100644
--- a/docs/changelog/6.x.x.txt
+++ b/docs/changelog/6.x.x.txt
@@ -1,3 +1,6 @@
+6.7.6
+- fix [ 1302878 ] testEnvironment.pl does not check versions (Wouter van Oijen / ProcoliX)
+
 6.7.5
  - Fixed a syntax error in Syndicated Content.
  - Fixed an infinite loop problem in Syndicated Content when no URLs were
diff --git a/sbin/testEnvironment.pl b/sbin/testEnvironment.pl
index 209ba9f6b..797297735 100644
--- a/sbin/testEnvironment.pl
+++ b/sbin/testEnvironment.pl
@@ -153,7 +153,8 @@ sub checkModule {
         my $statement = "require ".$module.";";
         if (eval($statement)) {
 		$statement = '$'.$module."::VERSION";
-		if (my $currentVersion = eval($statement)) {
+		my $currentVersion = eval($statement);
+		if ($currentVersion >= $version) {
 			printResult("OK");
 		} else {
                 	printResult("Outdated - Current: ".$currentVersion." / Required: ".$version);