projects
/
perl-cwmp.git
/ blobdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
|
commitdiff
|
tree
raw
| inline |
side by side
r260@brr: dpavlin | 2007-11-25 13:51:25 +0100
[perl-cwmp.git]
/
t
/
05-store.t
diff --git
a/t/05-store.t
b/t/05-store.t
index
746ad4c
..
0e885ad
100755
(executable)
--- a/
t/05-store.t
+++ b/
t/05-store.t
@@
-9,6
+9,8
@@
use Data::Dump qw/dump/;
use Cwd qw/abs_path/;
use lib 'lib';
+use Devel::LeakTrace::Fast;
+
BEGIN {
use_ok('CWMP::Store');
use_ok('CWMP::Store::DBMDeep');
@@
-76,6
+78,8
@@
sub test_store {
is_deeply( [ $store->all_uids ], [ 123456, 99999 ], 'all_uids' );
+ undef $store;
+
}
# now test all stores