summaryrefslogtreecommitdiffstats
path: root/t/03-dist.t
diff options
context:
space:
mode:
authorJesse Luehrs <doy@tozt.net>2013-07-08 17:20:23 -0400
committerJesse Luehrs <doy@tozt.net>2013-07-08 17:25:39 -0400
commit04a6fd13f7ea3a45881d6e75ea1dffba38a999fd (patch)
treeb275e3345e05514fea8264c82a82b8ce0973170f /t/03-dist.t
parent3e4a621b8dbe1a03d3bfc8c8cac349112d987b7c (diff)
downloaddist-checkconflicts-04a6fd13f7ea3a45881d6e75ea1dffba38a999fd.tar.gz
dist-checkconflicts-04a6fd13f7ea3a45881d6e75ea1dffba38a999fd.zip
remove test numbers
Diffstat (limited to 't/03-dist.t')
-rw-r--r--t/03-dist.t76
1 files changed, 0 insertions, 76 deletions
diff --git a/t/03-dist.t b/t/03-dist.t
deleted file mode 100644
index c40e22c..0000000
--- a/t/03-dist.t
+++ /dev/null
@@ -1,76 +0,0 @@
-#!/usr/bin/env perl
-use strict;
-use warnings;
-use Test::More;
-use Test::Fatal;
-use lib 't/lib/03';
-
-{
- use_ok('Foo::Conflicts::Good');
- is_deeply(
- [ Foo::Conflicts::Good->calculate_conflicts ],
- [],
- "correct versions for all conflicts",
- );
- is(
- exception { Foo::Conflicts::Good->check_conflicts },
- undef,
- "no conflict error"
- );
- is(Foo::Conflicts::Good->dist, 'Foo', "correct dist");
-}
-
-{
- use_ok('Foo::Conflicts::Bad');
-
- is_deeply(
- [ Foo::Conflicts::Bad->calculate_conflicts ],
- [
- { package => 'Foo', installed => '0.02', required => '0.03' },
- { package => 'Foo::Two', installed => '0.02', required => '0.02' },
- ],
- "correct versions for all conflicts",
- );
- is(
- exception { Foo::Conflicts::Bad->check_conflicts },
- "Conflicts detected for Foo:\n Foo is version 0.02, but must be greater than version 0.03\n Foo::Two is version 0.02, but must be greater than version 0.02\n",
- "correct conflict error"
- );
- is(Foo::Conflicts::Bad->dist, 'Foo', "correct dist");
-}
-
-{
- use_ok('Bar::Conflicts::Good');
- is_deeply(
- [ Bar::Conflicts::Good->calculate_conflicts ],
- [],
- "correct versions for all conflicts",
- );
- is(
- exception { Bar::Conflicts::Good->check_conflicts },
- undef,
- "no conflict error"
- );
- is(Bar::Conflicts::Good->dist, 'Bar', "correct dist");
-}
-
-{
- use_ok('Bar::Conflicts::Bad');
-
- is_deeply(
- [ Bar::Conflicts::Bad->calculate_conflicts ],
- [
- { package => 'Bar', installed => '0.02', required => '0.03' },
- { package => 'Bar::Two', installed => '0.02', required => '0.02' },
- ],
- "correct versions for all conflicts",
- );
- is(
- exception { Bar::Conflicts::Bad->check_conflicts },
- "Conflicts detected for Bar:\n Bar is version 0.02, but must be greater than version 0.03\n Bar::Two is version 0.02, but must be greater than version 0.02\n",
- "correct conflict error"
- );
- is(Bar::Conflicts::Bad->dist, 'Bar', "correct dist");
-}
-
-done_testing;