diff options
author | Jesse Luehrs <doy@tozt.net> | 2010-11-13 20:02:52 -0600 |
---|---|---|
committer | Jesse Luehrs <doy@tozt.net> | 2010-11-13 20:04:15 -0600 |
commit | 15c104e23985b21347465208bbf0aef53db3d105 (patch) | |
tree | 45b23ab6d49520877bb6f74f60c680b8ec6497a2 /t/06-addsub.t | |
parent | dfabcbae2bf40ad18f242f632fc20de8800cf0cf (diff) | |
download | package-stash-xs-15c104e23985b21347465208bbf0aef53db3d105.tar.gz package-stash-xs-15c104e23985b21347465208bbf0aef53db3d105.zip |
drop package_ from method names
Diffstat (limited to 't/06-addsub.t')
-rw-r--r-- | t/06-addsub.t | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/t/06-addsub.t b/t/06-addsub.t index 860a5c0..50a67fd 100644 --- a/t/06-addsub.t +++ b/t/06-addsub.t @@ -16,7 +16,7 @@ my $foo_stash = Package::Stash->new('Foo'); ok(!defined($Foo::{funk}), '... the &funk slot has not been created yet'); is(exception { - $foo_stash->add_package_symbol('&funk' => sub { "Foo::funk", __LINE__ }); + $foo_stash->add_symbol('&funk' => sub { "Foo::funk", __LINE__ }); }, undef, '... created &Foo::funk successfully'); ok(defined($Foo::{funk}), '... the &funk slot was created successfully'); @@ -33,7 +33,7 @@ my $line = (Foo->funk())[1]; is $DB::sub{'Foo::funk'}, sprintf "%s:%d-%d", __FILE__, $line, $line, '... got the right %DB::sub value for funk default args'; -$foo_stash->add_package_symbol( +$foo_stash->add_symbol( '&dunk' => sub { "Foo::dunk" }, filename => "FileName", first_line_num => 100, |