Revision: 990 Author: tim.bunce Date: Tue Dec 22 14:14:33 2009 Log: Fixed "Total Time" in reports to be sanely formatted.
http://code.google.com/p/perl-devel-nytprof/source/detail?r=990 Modified: /trunk/bin/nytprofhtml /trunk/lib/Devel/NYTProf/Reader.pm ======================================= --- /trunk/bin/nytprofhtml Thu Dec 17 15:48:46 2009 +++ /trunk/bin/nytprofhtml Tue Dec 22 14:14:33 2009 @@ -134,8 +134,8 @@ <td align="left">!~TOTAL_CALLS~!</td> </tr> <tr> -<td class="h" align="right">Total Time</td> -<td align="left">!~TOTAL_TIME~! seconds</td> +<td class="h" align="right">Statement Execution Time</td> +<td align="left">!~TOTAL_TIME~!</td> </tr> </table> }; ======================================= --- /trunk/lib/Devel/NYTProf/Reader.pm Thu Oct 22 09:24:17 2009 +++ /trunk/lib/Devel/NYTProf/Reader.pm Tue Dec 22 14:14:33 2009 @@ -22,6 +22,8 @@ use Devel::NYTProf::Data; use Devel::NYTProf::Util qw( + fmt_float + fmt_time strip_prefix_from_paths html_safe_filename calculate_median_absolute_deviation @@ -98,7 +100,7 @@ replace => "\$self->{filestats}->{\$filestr}->{'calls'}" }, { pattern => '!~TOTAL_TIME~!', - replace => "\$self->{filestats}->{\$filestr}->{'time'}" + replace => "fmt_time(\$self->{filestats}->{\$filestr}->{'time'})" }, ], callsfunc => undef, -- You've received this message because you are subscribed to the Devel::NYTProf Development User group. Group hosted at: http://groups.google.com/group/develnytprof-dev Project hosted at: http://perl-devel-nytprof.googlecode.com CPAN distribution: http://search.cpan.org/dist/Devel-NYTProf To post, email: [email protected] To unsubscribe, email: [email protected]
