--- trunk/t/2-parse.t 2006/09/26 18:14:20 718 +++ trunk/t/2-parse.t 2006/09/29 12:24:43 719 @@ -68,6 +68,7 @@ foreach my $db (keys %$n) { foreach my $i (keys %{$n->{$db}}) { ok(my $r = $parser->normalize_rules($db,$i), "normalize_source($db/$i)"); + diag "normalize_rules($db,$i) = $r" if ($debug); cmp_ok($n->{$db}->{$i}, 'eq', $r, "same"); } }