From c8df83aecbd78b2f5f9c0a1bc5723359f1625d41 Mon Sep 17 00:00:00 2001 From: Dobrica Pavlinusic Date: Sun, 3 Apr 2011 21:54:30 +0200 Subject: [PATCH] more robust _hash_eq --- lib/MojoFacets/Changes.pm | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/lib/MojoFacets/Changes.pm b/lib/MojoFacets/Changes.pm index ef23ef5..ca22b4e 100644 --- a/lib/MojoFacets/Changes.pm +++ b/lib/MojoFacets/Changes.pm @@ -21,7 +21,7 @@ sub _hash_eq { warn "# _hash_eq ",dump($a_ref,$b_ref); local $Storable::canonical = 1; - return Storable::freeze( $a_ref ) eq Storable::freeze( $b_ref ); + return eval { Storable::freeze( $a_ref ) } eq eval { Storable::freeze( $b_ref ) }; } sub index { -- 2.20.1