diff options
Diffstat (limited to 't/lib/Class/Load/Error/DieAfterIsa.pm')
| -rw-r--r-- | t/lib/Class/Load/Error/DieAfterIsa.pm | 14 |
1 files changed, 14 insertions, 0 deletions
diff --git a/t/lib/Class/Load/Error/DieAfterIsa.pm b/t/lib/Class/Load/Error/DieAfterIsa.pm new file mode 100644 index 0000000..0a021cd --- /dev/null +++ b/t/lib/Class/Load/Error/DieAfterIsa.pm @@ -0,0 +1,14 @@ +package Class::Load::Error::DieAfterIsa; + +use strict; +use warnings; + +# This library emulates a bug that can occur under App::Cmd, +# +# A broken library use's another library ( App::Cmd::Setup ), and that library +# injects @ISA during import->() + +our @ISA = qw( UNIVERSAL ); + +die "Not a syntax error"; + |