no trailing whitespace
[gitmo/MooseX-Types.git] / t / lib / SubExporterCompatibility.pm
CommitLineData
6974ed90 1package SubExporterCompatibility; {
e9dc30af 2
6974ed90 3 use MooseX::Types::Moose qw(Str);
4 use MooseX::Types -declare => [qw(MyStr)];
077ac262 5 use Sub::Exporter -setup => { exports => [ qw(something MyStr) ] };
e9dc30af 6
6974ed90 7 subtype MyStr,
8 as Str;
e9dc30af 9
6974ed90 10 sub something {
11 return 1;
e9dc30af 12 }
13
6974ed90 14} 1;