X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=blobdiff_plain;f=lib%2FMooseX%2FTypes%2FDateTime%2FMoreCoercions.pm;fp=lib%2FMooseX%2FTypes%2FDateTime%2FMoreCoercions.pm;h=1a8c33f2e9ddf0037bd44f8f9dcc70a7e9a4c466;hb=a7c573a08cdd34e18d595d0b6f6b194a6799dea2;hp=c8d7dd4566adbbcb6b440fcd76fcbf17187f93ef;hpb=2282093e8c7edd9b514d484766ee346a7390bf27;p=gitmo%2FMooseX-Types-DateTime-MoreCoercions.git

diff --git a/lib/MooseX/Types/DateTime/MoreCoercions.pm b/lib/MooseX/Types/DateTime/MoreCoercions.pm
index c8d7dd4..1a8c33f 100644
--- a/lib/MooseX/Types/DateTime/MoreCoercions.pm
+++ b/lib/MooseX/Types/DateTime/MoreCoercions.pm
@@ -18,13 +18,13 @@ use MooseX::Types 0.04 -declare => [qw( DateTime Duration)];
 
 subtype DateTime, as MooseX::Types::DateTime::DateTime;
 coerce( DateTime,
-    @{ $MooseX::Types::DateTime::coercions{DateTime} },
+    @{ MooseX::Types::DateTime::DateTime->coercion->type_coercion_map },
     from Str, via { DateTimeX::Easy->new($_) },
 );
 
 subtype Duration, as MooseX::Types::DateTime::Duration;
 coerce( Duration,
-    @{ $MooseX::Types::DateTime::coercions{"DateTime::Duration"} },
+    @{ MooseX::Types::DateTime::Duration->coercion->type_coercion_map },
     from Str, via { 
         DateTime::Duration->new( 
             seconds => parse_duration($_)