summaryrefslogtreecommitdiffstats
path: root/t/base.t
diff options
context:
space:
mode:
authorJesse Luehrs <doy@tozt.net>2011-12-19 14:06:16 -0600
committerJesse Luehrs <doy@tozt.net>2011-12-19 14:06:16 -0600
commit9cc8c0a89e3984a04758240a76940bb70f49f256 (patch)
tree4298a84ceb953be8fd71b3b1c3c7b5e2d75051f3 /t/base.t
parentb76fddd60aa8331c90c5b3cbe16f3c7685c5f4da (diff)
downloadcircular-require-9cc8c0a89e3984a04758240a76940bb70f49f256.tar.gz
circular-require-9cc8c0a89e3984a04758240a76940bb70f49f256.zip
remove test numbers
Diffstat (limited to 't/base.t')
-rw-r--r--t/base.t26
1 files changed, 26 insertions, 0 deletions
diff --git a/t/base.t b/t/base.t
new file mode 100644
index 0000000..c0e032d
--- /dev/null
+++ b/t/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;