diff options
| author | Radu Greab <radu@netsoft.ro> | 2002-06-08 03:49:02 +0300 |
|---|---|---|
| committer | Jarkko Hietaniemi <jhi@iki.fi> | 2002-06-07 20:51:15 +0000 |
| commit | 56d3e32d092cbfd472663b5f2168553262c8df58 (patch) | |
| tree | e3218a9d82e9b4d3ff32ff8d71fd324527ef0a8c /ext | |
| parent | 102380c26730aadf6ec74ff3f85a84d5b9a8706e (diff) | |
| download | perl-56d3e32d092cbfd472663b5f2168553262c8df58.tar.gz | |
Re: Major bug in Storable 2.03 with 5.6.1 (freeze & thaw hooks)
Message-ID: <15617.10830.557640.430565@ix.netsoft.ro>
p4raw-id: //depot/perl@17071
Diffstat (limited to 'ext')
| -rw-r--r-- | ext/Storable/t/recurse.t | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/ext/Storable/t/recurse.t b/ext/Storable/t/recurse.t index 4543e37918..d2da630a89 100644 --- a/ext/Storable/t/recurse.t +++ b/ext/Storable/t/recurse.t @@ -140,7 +140,7 @@ my $x = freeze $real; ok 1, 1; my $y = thaw $x; -ok 2, 1; +ok 2, ref $y eq 'OBJ_REAL'; ok 3, $y->[0] eq 'a'; ok 4, $y->[1] == 1; |