[gitmo/MooseX-Params-Validate.git] / t / 007_deprecated.t

use strict;
use warnings;

use Test::More;

{
    package Foo;

    use Moose;
    use MooseX::Params::Validate qw( :deprecated );
}

ok( Foo->can('validate'), ':deprecated tag exports validate' );
ok( Foo->can('validatep'), ':deprecated tag exports validatep' );

done_testing();
Commit	Line	Data
d9d1529d	1	use strict;
	2	use warnings;
	3
d7a80104	4	use Test::More;
d9d1529d	5
	6	{
	7	package Foo;
	8
	9	use Moose;
	10	use MooseX::Params::Validate qw( :deprecated );
d9d1529d	11	}
	12
	13	ok( Foo->can('validate'), ':deprecated tag exports validate' );
	14	ok( Foo->can('validatep'), ':deprecated tag exports validatep' );
d7a80104	15
d7a80104	16	done_testing();