Change 32726 by [EMAIL PROTECTED] on 2007/12/26 13:03:27
Use print rather than diag(), as these routine messages shouldn't be
going to STDERR.
Affected files ...
... //depot/perl/t/op/upgrade.t#2 edit
Differences ...
==== //depot/perl/t/op/upgrade.t#2 (text) ====
Index: perl/t/op/upgrade.t
--- perl/t/op/upgrade.t#1~32724~ 2007-12-26 03:22:38.000000000 -0800
+++ perl/t/op/upgrade.t 2007-12-26 05:03:27.000000000 -0800
@@ -41,7 +41,9 @@
my $vars = {};
$vars->{dest} = $types{$dest_type};
$vars->{source} = $types{$source_type};
- diag "Assigning $source_type to $dest_type";
+ # The assignment can potentially trigger assertion failures, so it's
+ # useful to have the diagnostics about what was attempted printed first
+ print "# Assigning $source_type to $dest_type\n";
$vars->{dest} = $vars->{source};
is ($vars->{dest}, $vars->{source});
}
End of Patch.
