From: Dave Rolsky Date: Mon, 8 Dec 2008 17:12:33 +0000 (+0000) Subject: No point in keeping this todo test for parameterized roles in the X-Git-Tag: 0.63~1 X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=commitdiff_plain;h=670f22707ddd247f7adf0dc8723bdc72d060f0fc;p=gitmo%2FMoose.git No point in keeping this todo test for parameterized roles in the Moose distro now that we have an MX module for it. --- diff --git a/MANIFEST b/MANIFEST index 1e813ae..b1a2daf 100644 --- a/MANIFEST +++ b/MANIFEST @@ -165,7 +165,6 @@ t/030_roles/023_role_composition_attributes.t t/030_roles/024_role_composition_methods.t t/030_roles/025_role_composition_override.t t/030_roles/026_role_composition_method_mods.t -t/030_roles/030_role_parameterized.t t/030_roles/031_roles_applied_in_create.t t/030_roles/032_roles_and_method_cloning.t t/030_roles/033_role_exclusion_and_alias_bug.t diff --git a/t/030_roles/030_role_parameterized.t b/t/030_roles/030_role_parameterized.t deleted file mode 100644 index 997520b..0000000 --- a/t/030_roles/030_role_parameterized.t +++ /dev/null @@ -1,37 +0,0 @@ -#!/usr/bin/perl - -use strict; -use warnings; - -use Test::More skip_all => 'The feature this test exercises is not yet written'; -use Test::Exception; - - -{ - package Scalar; - use Moose::Role; - - BEGIN { parameter T => { isa => 'Moose::Meta::TypeConstraint' } }; - - has 'val' => (is => 'ro', isa => T); - - requires 'eq'; - - sub not_eq { ! (shift)->eq(shift) } -} - -is_deeply( - Scalar->meta->parameters, - { T => { isa => 'Moose::Meta::TypeConstraint' } }, - '... got the right parameters in the role' -); - -{ - package Integers; - use Moose; - use Moose::Util::TypeConstraints; - - with Scalar => { T => find_type_constraint('Int') }; - - sub eq { shift == shift } -}