summaryrefslogtreecommitdiffstats
path: root/t/02-conflicts.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/02-conflicts.t
parent3e4a621b8dbe1a03d3bfc8c8cac349112d987b7c (diff)
downloaddist-checkconflicts-04a6fd13f7ea3a45881d6e75ea1dffba38a999fd.tar.gz
dist-checkconflicts-04a6fd13f7ea3a45881d6e75ea1dffba38a999fd.zip
remove test numbers
Diffstat (limited to 't/02-conflicts.t')
-rw-r--r--t/02-conflicts.t104
1 files changed, 0 insertions, 104 deletions
diff --git a/t/02-conflicts.t b/t/02-conflicts.t
deleted file mode 100644
index 19cd72b..0000000
--- a/t/02-conflicts.t
+++ /dev/null
@@ -1,104 +0,0 @@
-#!/usr/bin/env perl
-use strict;
-use warnings;
-
-use Test::More;
-use Test::Fatal;
-use Test::Warnings 0.005 'warning';
-use lib 't/lib/02';
-
-{
- 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"
- );
-}
-
-{
- 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::Conflicts::Bad:\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"
- );
-}
-
-{
- 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"
- );
-}
-
-{
- 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::Conflicts::Bad:\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"
- );
-}
-
-{
- # conflicting module is utterly broken
-
- use_ok('Foo::Conflicts::Broken');
-
- my @conflicts;
- like warning { @conflicts = Foo::Conflicts::Broken->calculate_conflicts },
- qr/Warning: Broken did not compile/,
- 'Warning is issued when Broken fails to compile';
-
- is_deeply(
- \@conflicts,
- [
- { package => 'Broken', installed => 'unknown', required => '0.03' },
- ],
- "correct versions for all conflicts",
- );
-
- like warning {
- like(
- exception { Foo::Conflicts::Broken->check_conflicts },
- qr/^Conflicts detected for Foo::Conflicts::Broken:\n Broken is version unknown, but must be greater than version 0.03\n/,
- "correct conflict error",
- );
- },
- qr/Warning: Broken did not compile/,
- 'Warning is also issued when Broken fails to compile',
- ;
-}
-
-done_testing;