work around annoying base.pm behavior0.03

1 files changed, 26 insertions, 0 deletions

diff --git a/t/03-base.t b/t/03-base.t
new file mode 100644
index 0000000..c0e032d
--- /dev/null
+++ b/t/03-base.t
@@ -0,0 +1,26 @@
+#!/usr/bin/env perl
+use strict;
+use warnings;
+use Test::More;
+
+my $success = eval <<EOF;
+no circular::require;
+
+{
+    package Foo;
+    sub bar {}
+}
+
+{
+    package Bar;
+    use base 'Foo';
+}
+1;
+EOF
+
+my $e = $@;
+
+ok($success, "no error with use base")
+    || diag($e);
+
+done_testing;