diff options
author | Jesse Luehrs <doy@tozt.net> | 2010-06-15 19:11:16 -0500 |
---|---|---|
committer | Jesse Luehrs <doy@tozt.net> | 2010-06-15 19:11:16 -0500 |
commit | 988beb418b12b8cc4821055d79361f807c98aa36 (patch) | |
tree | 91f81ac9ba0f1accdd2740ee67ee2fb0d51ed11b /t/05-isa.t | |
parent | a9daba9ef318d1fd94851773d6c3f061ce5dae04 (diff) | |
download | package-stash-988beb418b12b8cc4821055d79361f807c98aa36.tar.gz package-stash-988beb418b12b8cc4821055d79361f807c98aa36.zip |
updated dzil stuff
Diffstat (limited to 't/05-isa.t')
-rw-r--r-- | t/05-isa.t | 21 |
1 files changed, 21 insertions, 0 deletions
diff --git a/t/05-isa.t b/t/05-isa.t new file mode 100644 index 0000000..3198fb1 --- /dev/null +++ b/t/05-isa.t @@ -0,0 +1,21 @@ +#!/usr/bin/env perl +use strict; +use warnings; +use Test::More; + +use Package::Stash; + +{ + package Foo; +} + +{ + package Bar; +} + +my $stash = Package::Stash->new('Foo'); +my @ISA = ('Bar'); +@{$stash->get_package_symbol('@ISA')} = @ISA; +isa_ok('Foo', 'Bar'); + +done_testing; |