[libdevel-nytprof-perl] 05/14: Refresh flamegraph.patch.

[gregor herrmann]

This is an automated email from the git hooks/post-receive script.

gregoa pushed a commit to branch master
in repository libdevel-nytprof-perl.

commit 9467346e39cd6af9051f752d06b66ed3cbbf0913
Author: gregor herrmann <gregoa at debian.org>
Date:   Mon Jun 8 19:29:33 2015 +0200

    Refresh flamegraph.patch.
---
 debian/patches/flamegraph.patch | 17 ++++++++---------
 1 file changed, 8 insertions(+), 9 deletions(-)

diff --git a/debian/patches/flamegraph.patch b/debian/patches/flamegraph.patch
index 67cfa3d..54ddaf4 100644
--- a/debian/patches/flamegraph.patch
+++ b/debian/patches/flamegraph.patch
@@ -4,16 +4,15 @@ Origin: vendor
 Bug-Debian: http://bugs.debian.org/718731
 Forwarded: https://github.com/timbunce/devel-nytprof/issues/13
 Author: gregor herrmann <gregoa at debian.org>
-Last-Update: 2013-09-22
+Last-Update: 2015-06-08
 
 --- a/bin/nytprofhtml
 +++ b/bin/nytprofhtml
-@@ -814,7 +814,7 @@
-             # total (width) for flamegraph is profiler_active in ticks
-             my $run_us = $profile->{attribute}{profiler_active} * $profile->{attribute}{ticks_per_sec};
-             my $extension = $^O eq "MSWin32" ? "" : ".pl";
--            my $fg_cmd = "flamegraph$extension --nametype=sub --countname=microseconds";
-+            my $fg_cmd = "/usr/share/perl5/Devel/NYTProf/flamegraph$extension --nametype=sub --countname=microseconds";
-             system("$fg_cmd --factor=$factor --nameattr=$subattr --total=$run_us $opt_out/$call_stacks_file > $opt_out/$call_stacks_svg") == 0
-                 or die "Generating $opt_out/$call_stacks_svg failed\n";
+@@ -80,6 +80,7 @@
  
+ my $flamegraph   = File::Spec->catfile($Config{'bin'}, 'flamegraph') . $script_ext;
+ $flamegraph      = which "flamegraph$script_ext" if not -e $flamegraph;
++$flamegraph      = '/usr/share/perl5/Devel/NYTProf/flamegraph.pl';
+ 
+ die "Unable to find flamegraph$script_ext in $Config{bin} or on the PATH"
+     unless $flamegraph;

-- 
Alioth's /usr/local/bin/git-commit-notice on /srv/git.debian.org/git/pkg-perl/packages/libdevel-nytprof-perl.git