Revision: 1393
Author: [email protected]
Date: Tue Nov 9 16:55:13 2010
Log: Fix skip_collapse_evals
http://code.google.com/p/perl-devel-nytprof/source/detail?r=1393
Modified:
/trunk/lib/Devel/NYTProf/Data.pm
=======================================
--- /trunk/lib/Devel/NYTProf/Data.pm Tue Nov 9 14:58:56 2010
+++ /trunk/lib/Devel/NYTProf/Data.pm Tue Nov 9 16:55:13 2010
@@ -117,7 +117,7 @@
# Where a given eval() has been invoked more than once
# rollup the corresponding fids if they're "uninteresting".
- if ($args->{skip_collapse_evals}) {
+ if (not $args->{skip_collapse_evals}) {
for my $fi ($profile->noneval_fileinfos) {
$profile->collapse_evals_in($fi);
}
--
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]
