t/noimport-register_plugins.t


1
2
3
4
5
6
7
8
9
10
11
12
13

#!perl -w

use Data::Compare ();
Data::Compare->register_plugins();

print "1..1\n";

my $test = 0;

# and now there should be plugins

print "not " if(Data::Compare::Compare({}, Data::Compare::plugins()));
print 'ok '.(++$test)." plugins available in no-import mode if explicitly asked for\n";