From: Radu Greab <radu@netsoft.ro>
Date: Sat, 8 Jun 2002 00:49:02 +0000 (+0300)
Subject: Re: Major bug in Storable 2.03 with 5.6.1 (freeze & thaw hooks)
X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=commitdiff_plain;h=56d3e32d092cbfd472663b5f2168553262c8df58;p=p5sagit%2Fp5-mst-13.2.git

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
---

diff --git a/ext/Storable/t/recurse.t b/ext/Storable/t/recurse.t
index 4543e37..d2da630 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;