Make sure t/10-pure-perl.t runs are identical regardless of invocation
[p5sagit/namespace-clean.git] / t / 00-basic.t
CommitLineData
40aef9d6 1use warnings;
2use strict;
3
726710b6 4use lib 't/lib';
40aef9d6 5use Test::More tests => 4;
6
7use ExporterTest qw( foo bar );
8
04312494 9BEGIN {
40aef9d6 10 ok( main->can('foo'), 'methods are there before cleanup' );
1a1be5dc 11 eval { require namespace::clean ;; namespace::clean->import };
40aef9d6 12 ok( !$@, 'module use ok' );
13}
14
15ok( !main->can($_), "$_ function removed" )
16 for qw( foo bar );
17