Revision: 1061
Author: [email protected]
Date: Wed Feb 17 08:36:02 2010
Log: Fix a bug in the regexp of r1048 - we weren't actually matching the
comment.
This highlights the need for real tests for nytprofmerge - help requested.
Get your name up in lights here. Get your "thank you" noticed.
http://code.google.com/p/perl-devel-nytprof/source/detail?r=1061
Modified:
/trunk/bin/nytprofmerge
=======================================
--- /trunk/bin/nytprofmerge Tue Feb 9 06:52:26 2010
+++ /trunk/bin/nytprofmerge Wed Feb 17 08:36:02 2010
@@ -105,7 +105,7 @@
# This isn't true unless we enable compression ourselves, and if we
# do that, the low level code will write out a correct comment
# automatically.
- return if $text =~ /\A Compressed at level \d with zlib [0-9.]+\n\z/;
+ return if $text =~ /\ACompressed at level \d with zlib [0-9.]+\n\z/;
$out->write("#$text")
},
ATTRIBUTE => sub {
--
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]
