Fix tests

This commit is contained in:
gfx
2010-09-17 13:10:54 +09:00
parent 599964ea5f
commit 5e602fb575
4 changed files with 64 additions and 24 deletions

View File

@@ -1,6 +1,7 @@
package t::Util;
use strict;
use warnings;
use Data::MessagePack;
sub import {
my $pkg = caller(0);
@@ -15,6 +16,7 @@ sub import {
*{"$pkg\::false"} = sub () {
Data::MessagePack::false()
};
*{"$pkg\::null"} = sub() { undef };
}
1;