On Wed, Jun 30, 2004 at 03:29:22PM +0100, Fergal Daly wrote:
> Actually, it seems that some of the patches were applied. The problem is
> that is_deeply() delegates to ->is_eq() for non deep arguments but handles
> it's own string comparison once you descend into the structure. The patch
> below seems to fix it,
> 
> F
> 
> 
> --- More.pm.orig        2004-06-30 15:15:24.182762112 +0100
> +++ More.pm     2004-06-30 15:16:36.330793944 +0100
> @@ -1035,7 +1035,9 @@
>          # Quiet uninitialized value warnings when comparing undefs.
>          local $^W = 0; 
>  
> -        if( ! (ref $e1 xor ref $e2) and $e1 eq $e2 ) {
> +        if( ! (ref $e1 xor ref $e2) and 
> +            ! (defined $e1 xor defined $2) and
> +            $e1 eq $e2 ) {
>              $ok = 1;
>          }
>          else {

<head scratch> What version of Test::More is that?


-- 
Michael G Schwern        [EMAIL PROTECTED]  http://www.pobox.com/~schwern/
Do not try comedy at home!  Milk & Cheese are advanced experts!  Attempts at
comedy can be dangerously unfunny!

Reply via email to