X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=blobdiff_plain;f=t%2F001_basic.t;h=e75f51ed0083ced0e00c6a1145536f44e0e2c31c;hb=ba5bba75ba0c4f8af075e95ce3b00e5376bedf5c;hp=06c343cbb200d0ea4816a63bb83d42e07c67b640;hpb=95f31c36141c0108605fadf16d9abd9ec8bd63f3;p=gitmo%2FMooseX-Storage.git diff --git a/t/001_basic.t b/t/001_basic.t index 06c343c..e75f51e 100644 --- a/t/001_basic.t +++ b/t/001_basic.t @@ -39,14 +39,14 @@ BEGIN { is_deeply( $foo->pack, { - __class__ => 'Foo', + __CLASS__ => 'Foo', number => 10, string => 'foo', float => 10.5, array => [ 1 .. 10 ], hash => { map { $_ => undef } ( 1 .. 10 ) }, object => { - __class__ => 'Foo', + __CLASS__ => 'Foo', number => 2 }, }, @@ -57,14 +57,14 @@ BEGIN { { my $foo = Foo->unpack( { - __class__ => 'Foo', + __CLASS__ => 'Foo', number => 10, string => 'foo', float => 10.5, array => [ 1 .. 10 ], hash => { map { $_ => undef } ( 1 .. 10 ) }, object => { - __class__ => 'Foo', + __CLASS__ => 'Foo', number => 2 }, }