diff options
author | Daniel Friesel <derf@derf.homelinux.org> | 2009-07-11 18:06:30 +0200 |
---|---|---|
committer | Daniel Friesel <derf@derf.homelinux.org> | 2009-07-11 18:06:30 +0200 |
commit | c9f8a8aa21c2804701d678afe5d05512df789617 (patch) | |
tree | c7219c756d588d5a51967bf821e929a82f0b089d /t/simplestore.t | |
parent | ecca64326f6b745787e2edd9951cc95263aa42f6 (diff) |
Don't export any functions by default
Diffstat (limited to 't/simplestore.t')
-rw-r--r-- | t/simplestore.t | 8 |
1 files changed, 4 insertions, 4 deletions
diff --git a/t/simplestore.t b/t/simplestore.t index 3c35f83..b6c30a3 100644 --- a/t/simplestore.t +++ b/t/simplestore.t @@ -13,18 +13,18 @@ BEGIN {use_ok('Simplestore')} require_ok('Simplestore'); $hash = {foo => "bar\nbar"}; -ok(save($testfile, $hash), 'save hash 1'); +ok(Simplestore::save($testfile, $hash), 'save hash 1'); undef $hash; -ok($hash = load($testfile), 'load hash 1'); +ok($hash = Simplestore::load($testfile), 'load hash 1'); is($hash->{foo}, "bar\nbar", 'successful storage & load'); $hash = {dude => "dudette\nfoo"}; -$hash = load($testfile, $hash); +$hash = Simplestore::load($testfile, $hash); is($hash->{dude}, "dudette\nfoo", 'load: preserve hash keys'); $hash = {foo => "moose\nbaz"}; -$hash = load($testfile, $hash); +$hash = Simplestore::load($testfile, $hash); is($hash->{foo}, "bar\nbar", 'load: overwrite conflicting hash keys'); unlink($testfile); |