diff options
author | Jesse Luehrs <doy@tozt.net> | 2011-01-05 23:05:37 -0600 |
---|---|---|
committer | Jesse Luehrs <doy@tozt.net> | 2011-01-05 23:05:37 -0600 |
commit | 57011a68cc3bc9ed5443e3089fe73d46fa38a779 (patch) | |
tree | 00c1fb5b7bdbbc5bc79f1c3c89cdd855d3f1f1dc /t/lib | |
parent | fbef4983066edbde84d915b4968e65b0efb59534 (diff) | |
download | package-stash-xs-57011a68cc3bc9ed5443e3089fe73d46fa38a779.tar.gz package-stash-xs-57011a68cc3bc9ed5443e3089fe73d46fa38a779.zip |
fix another edge case with initial values
Diffstat (limited to 't/lib')
-rw-r--r-- | t/lib/CompileTime.pm | 15 |
1 files changed, 15 insertions, 0 deletions
diff --git a/t/lib/CompileTime.pm b/t/lib/CompileTime.pm new file mode 100644 index 0000000..925bc18 --- /dev/null +++ b/t/lib/CompileTime.pm @@ -0,0 +1,15 @@ +package CompileTime; +use strict; +use warnings; + +use Package::Stash; + +our $foo = 23; + +BEGIN { + my $stash = Package::Stash->new(__PACKAGE__); + $stash->add_symbol('$bar', $foo); + $stash->add_symbol('$baz', $stash->get_symbol('$foo')); +} + +1; |