perl: cleanup

This commit is contained in:
Fuji, Goro
2010-10-07 16:13:56 +09:00
parent f3ee5ab372
commit 8548b3645a

View File

@@ -8,13 +8,13 @@ our $PreferInteger = 0;
sub true () {
require Data::MessagePack::Boolean;
no warnings 'once', 'redefine';
no warnings 'once';
return $Data::MessagePack::Boolean::true;
}
sub false () {
require Data::MessagePack::Boolean;
no warnings 'once', 'redefine';
no warnings 'once';
return $Data::MessagePack::Boolean::false;
}