1 files changed, 0 insertions, 116 deletions
diff --git a/SBO-Lib/t/versions.t b/SBO-Lib/t/versions.t
deleted file mode 100755
index 5793bdc..0000000
--- a/SBO-Lib/t/versions.t
+++ /dev/null
@@ -1,116 +0,0 @@
-#!/usr/bin/perl
-#$Id: versions.t,v 1.9 2003/08/24 22:33:03 ed Exp $
-
-use 5.006;
-use strict;
-use warnings;
-
-use Sort::Versions;
-use Test::More;
-
-my @tests;
-
-while(<DATA>) {
-	if(/^\s*(\S+)\s*([<>])\s*(\S+)\s*$/) {
-		push @tests, $1,$3 if $2 eq "<";
-		push @tests, $3,$1 if $2 eq ">";
-	}
-}
-
-plan tests => (@tests / 2 * 3) + 3;
-
-my @l = sort versions qw(1.2 1.2a);
-is($l[0], "1.2");
-
-@l = sort { versioncmp($a, $b) } qw(1.2 1.2a);
-is($l[0], "1.2");
-
-SKIP: {
-    skip "requires perl 5.6.0", 1 unless ($] >= 5.006);
-    @l = sort versioncmp qw(1.2 1.2a);
-    is($l[0], "1.2");
-}
-
-my $i=4;
-while (@tests) {
-    ($a, $b) = @tests[0, 1];
-
-    # Test both the versioncmp() and versions() interfaces, in both
-    # the main package and other packages.
-    #
-    is(versions(), -1, "versions($a, $b)");
-    $i++;
-
-    is(versioncmp($a, $b), -1, "versioncmp($a, $b)");
-    $i++;
-	
-    undef $a; undef $b; # just in case
-	
-    eval {
-	package Foo;
-	use Sort::Versions;
-	($a, $b) = @tests[0, 1];
-
-        if (versions() != -1) {
-	    die "failed versions() in foreign package";
-	}
-
-        if (versioncmp($a, $b) != -1) {
-	    die "failed versioncmp() in foreign package";
-	}
-    };
-    if ($@) {
-	fail($@);
-    }
-    else {
-	pass("foreign package tests ($tests[0], $tests[1])");
-    }
-
-    shift @tests; shift @tests;
-}
-
-
-__END__
-
-# Simple . only tests
-1.2   < 1.3
-1.2   < 1.2.1
-1.2.1 < 1.3
-1.2   < 1.2a
-1.2a  < 1.3
-1.2   < 1.2.b
-1.2.1 < 1.2a
-1.2.b < 1.2a
-
-# Assorted non-numerics
-a     < b
-a     < a.b
-a.b   < a.c
-a.1   < a.a
-1 < a
-1a < a
-1a < 2
-
-# Null version point
-1..1 < 1.1.1
-
-# Leading 0 tests
-1 > 0002
-1.5 > 1.06
-
-# Handling mixed -. versions
-1 < 1-1
-1-1 < 1-2
-1-2 < 1.2
-1-2 < 1.0-1
-1-2 < 1.0
-1-2 < 1.3
-1.2-1 < 1.2a-1
-1.3-4.6-7 < 1.3-4.8
-1.3-4.6-7 < 1.3-4.6.7
-1.3-4a-7 < 1.3-4a-7.4
-
-# 'Bug' reported by pgw99
-1.2-1 < 1.2.1-1
-1.2.1-1 < 1.2.1-2
-1.2.1-2 < 1.3.0-1