File: noimport.t

package info (click to toggle)
libdata-compare-perl 1.23-0.1
  • links: PTS
  • area: main
  • in suites: jessie, jessie-kfreebsd
  • size: 224 kB
  • ctags: 12
  • sloc: perl: 412; sh: 3; makefile: 2
file content (11 lines) | stat: -rw-r--r-- 251 bytes parent folder | download | duplicates (8) 
1
2
3
4
5
6
7
8
9
10
11
 
#!perl -w

use Data::Compare ();
print "1..1\n";

my $test = 0;

# in no-import mode there should be no plugins

print "not " unless(Data::Compare::Compare({}, Data::Compare::plugins()));
print 'ok '.(++$test)." plugins disabled in no-import mode\n";