Revision: 1378
Author: [email protected]
Date: Mon Oct 11 07:45:33 2010
Log: Polish up handling of htmlopen option
http://code.google.com/p/perl-devel-nytprof/source/detail?r=1378
Modified:
/trunk/lib/Devel/NYTProf/Run.pm
=======================================
--- /trunk/lib/Devel/NYTProf/Run.pm Mon Sep 27 03:44:39 2010
+++ /trunk/lib/Devel/NYTProf/Run.pm Mon Oct 11 07:45:33 2010
@@ -95,7 +95,9 @@
# undocumented hack that's handy for testing
if ($opt{htmlopen}) {
- warn system("nytprofhtml --open --file='$out_file'");
+ my @nytprofhtml_open =
("nytprofhtml", "--open", "-file=$out_file");
+ warn "Running @nytprofhtml_open\n";
+ system @nytprofhtml_open;
}
my $profile = Devel::NYTProf::Data->new( { filename => $out_file } );
--
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]
