diff options
Diffstat (limited to 't')
-rw-r--r-- | t/03-base.t | 26 |
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; |