#!/usr/bin/perl
# Check for regressions.
use Mooix::Thing;
use Test::More tests => 1, import => ['!fail'];
run sub {
	my $this=shift;
	ok(! $this->encapsulator->implements("test_perl"), 
		"subdirectories are not methods (rev 1730)");
}
