From e94260dab724974551751dbdda9c4c9abde76e6e Mon Sep 17 00:00:00 2001 From: Jesse Luehrs Date: Fri, 14 May 2010 11:39:56 -0500 Subject: rename Stash::Manip -> Package::Stash --- t/002-extension.t | 10 +++++----- 1 file changed, 5 insertions(+), 5 deletions(-) (limited to 't/002-extension.t') diff --git a/t/002-extension.t b/t/002-extension.t index 4a9e7c1..2f95f15 100644 --- a/t/002-extension.t +++ b/t/002-extension.t @@ -5,11 +5,11 @@ use Test::More; use Test::Exception; { - package My::Stash::Manip; + package My::Package::Stash; use strict; use warnings; - use base 'Stash::Manip'; + use base 'Package::Stash'; use Symbol 'gensym'; @@ -29,10 +29,10 @@ use Test::Exception; } # No actually package Foo exists :) -my $foo_stash = My::Stash::Manip->new('Foo'); +my $foo_stash = My::Package::Stash->new('Foo'); -isa_ok($foo_stash, 'My::Stash::Manip'); -isa_ok($foo_stash, 'Stash::Manip'); +isa_ok($foo_stash, 'My::Package::Stash'); +isa_ok($foo_stash, 'Package::Stash'); ok(!defined($Foo::{foo}), '... the %foo slot has not been created yet'); ok(!$foo_stash->has_package_symbol('%foo'), '... the foo_stash agrees'); -- cgit v1.2.3-54-g00ecf