From a8ab21e070fb8425a597309991fd5afd7f73e6f5 Mon Sep 17 00:00:00 2001 From: Mason James Date: Fri, 27 Jan 2017 16:42:07 +1300 Subject: [PATCH] Revert "Bug 17880 - Add test to check version number comparison" This reverts commit 2942adf41545b0e025f343ce60c2dfae9aa6a7c0. --- t/Installer_PerlModules.t | 14 +------------- 1 file changed, 1 insertion(+), 13 deletions(-) diff --git a/t/Installer_PerlModules.t b/t/Installer_PerlModules.t index fafdd48e8d..1d5a00c4d4 100755 --- a/t/Installer_PerlModules.t +++ b/t/Installer_PerlModules.t @@ -6,22 +6,12 @@ use strict; use warnings; -use Test::More tests => 19; +use Test::More tests => 17; BEGIN { use_ok('C4::Installer::PerlModules'); } -$C4::Installer::PerlModules::PERL_DEPS->{'Local::Module::Sort'} = { - 'required' => '1', - 'min_ver' => '0.9.3', - 'usage' => "Testing: make sure numbers are compared numerically and not lexicographically", -}; - -$Local::Module::Sort::VERSION = '0.9.13'; -$INC{"Local/Module/Sort.pm"} = 1; -use_ok("Local::Module::Sort"); - my $modules; ok ($modules = C4::Installer::PerlModules->new(), 'Tests modules object'); my $prereq_pm = $modules->prereq_pm(); @@ -47,5 +37,3 @@ my @module_list = $modules->module_list; ok (exists($params{"DBI"}), 'DBI exists in array'); is ($modules->required('module'=>"String::Random"),1, 'String::Random should return 1 since required'); ok (!$modules->version_info(), "Testing empty modules"); - -is($modules->version_info('module'=>"Local::Module::Sort")->{"Local::Module::Sort"}->{"upgrade"},0,"Version 0.9.13 is greater than 0.9.3, so no upgrade needed"); -- 2.11.4.GIT