Revision: 1049
Author: [email protected]
Date: Mon Feb 8 07:28:18 2010
Log: Missing a space before 'and'.
http://code.google.com/p/perl-devel-nytprof/source/detail?r=1049
Modified:
/trunk/bin/nytprofmerge
=======================================
--- /trunk/bin/nytprofmerge Mon Feb 8 06:49:47 2010
+++ /trunk/bin/nytprofmerge Mon Feb 8 07:28:18 2010
@@ -334,7 +334,7 @@
sprintf "$prog ($count run%s)", $count == 1 ? '' : 's';
}
my $last = pop @grouped;
- my $value = @grouped ? join (', ', @grouped) . "and $last" : $last;
+ my $value = @grouped ? join (', ', @grouped) . " and $last" : $last;
$out->write(":$key=$value\n");
} else {
warn "Unknown attribute $key\n";
--
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]
