On Thu, 13 Dec 2001 15:56:52 -0500 Barrie Slaymaker <[EMAIL PROTECTED]> wrote:
> Please feel free to test and suggest :). It rocks. Well, why not globally overrides Test::More's is, is_deeply etc? use Test::More; use Test::Differences qw(:overrides_test_more); is $got, $excepted, 'is() becomes eq_or_diff()'; BTW, here's a patch for backward compat with 5.5.3, and removes dump for your debug :) --- Differences.pm~ Fri Dec 14 05:39:30 2001 +++ Differences.pm Fri Dec 14 14:09:02 2001 @@ -146,7 +146,7 @@ $_ =~ s/\r/\\r/g ; $_ =~ s/\t/\\t/g ; $_ =~ s{ - ([^[:print:]]) + ([^[\040-\377\r\n]]) }{ my $codepoint = ord $1 ; $codepoint <= 0xFF @@ -355,7 +355,7 @@ pop ; # Ignore options my $ops = pop ; ## Leave sequences in @_[0,1] -use Data::Dumper ; print Dumper $self ; +#use Data::Dumper ; print Dumper $self ; ## Line numbers are one off, gotta bump them push @{$self->{LINES}}, [ -- Tatsuhiko Miyagawa <[EMAIL PROTECTED]>