package B::Lint::Plugin::Test;
use strict;
use warnings;
# This package will be loaded automatically by Module::Plugin when
# B::Lint loads.
warn 'got here!';
sub match {
my $op = shift @_;
# Prints to STDERR which will be picked up by the test running in
# lint.t
warn "Module::Pluggable ok.\n";
# Ignore this method once it happens once.
*match = sub { };
}
1;