[gitmo/Package-Stash-XS.git] / t / inc-hook.t

#!/usr/bin/env perl
use strict;
use warnings;
use Test::More;
use Test::Fatal;
use lib 't/lib';

unshift @INC, sub { "some regex" =~ /match/; undef };

is(exception { require Package::Stash }, undef, "works with an \@INC hook");

done_testing;
Commit	Line	Data
c803b921	1	#!/usr/bin/env perl
	2	use strict;
	3	use warnings;
	4	use Test::More;
	5	use Test::Fatal;
	6	use lib 't/lib';
	7
	8	unshift @INC, sub { "some regex" =~ /match/; undef };
	9
	10	is(exception { require Package::Stash }, undef, "works with an \@INC hook");
	11
	12	done_testing;