Trivial, nonetheless improving.
Line 1339 in Catalyst.pm (from Catalyst-Runtime-5.7007)
reads:
my $av = sprintf '%.3f', ( $elapsed == 0 ? '??' : ( 1 /
$elapsed ) );
which of course triggers the warning:
Argument "??" isn't numeric in sprintf
when $elapsed==0 is true.
It also causes $av to be set to 0.000, which is a misleading
value,
given the situation.
The obvious correction is to substitute the above mentioned
line with:
my $av = $elapsed == 0 ? '??' : sprintf '%.3f', 1 /
$elapsed;
Patch (against Catalyst.pm in trunk -- Revision 6575)
attached, if
necessary.
Cheers,
Emanuele.
_______________________________________________
Catalyst-dev mailing list
Catalyst-dev lists.rawmode.org
http://lists.rawmode.org/mailman/listinfo/catalyst-dev
|