<pre style='margin:0'>
David B. Evans (dbevans) pushed a commit to branch master
in repository macports-ports.

</pre>
<p><a href="https://github.com/macports/macports-ports/commit/13e69e63aa404f9dce5b931f2614c714fec3c9f7">https://github.com/macports/macports-ports/commit/13e69e63aa404f9dce5b931f2614c714fec3c9f7</a></p>
<pre style="white-space: pre; background: #F8F8F8">The following commit(s) were added to refs/heads/master by this push:
<span style='display:block; white-space:pre;color:#404040;'>     new 13e69e6  p5-devel-nytprof: use MacPorts-installed scripts
</span>13e69e6 is described below

<span style='display:block; white-space:pre;color:#808000;'>commit 13e69e63aa404f9dce5b931f2614c714fec3c9f7
</span>Author: Christopher Chavez <chrischavez@gmx.us>
AuthorDate: Thu Jun 6 02:49:17 2019 -0500

<span style='display:block; white-space:pre;color:#404040;'>    p5-devel-nytprof: use MacPorts-installed scripts
</span><span style='display:block; white-space:pre;color:#404040;'>    
</span><span style='display:block; white-space:pre;color:#404040;'>    Closes: https://trac.macports.org/ticket/56635
</span>---
 perl/p5-devel-nytprof/Portfile                     |  5 ++-
 .../files/patch-bin-nytprofhtml.diff               | 40 ++++++++++++++++++++++
 2 files changed, 44 insertions(+), 1 deletion(-)

<span style='display:block; white-space:pre;color:#808080;'>diff --git a/perl/p5-devel-nytprof/Portfile b/perl/p5-devel-nytprof/Portfile
</span><span style='display:block; white-space:pre;color:#808080;'>index ddb8c40..92a3d4d 100644
</span><span style='display:block; white-space:pre;background:#e0e0ff;'>--- a/perl/p5-devel-nytprof/Portfile
</span><span style='display:block; white-space:pre;background:#e0e0ff;'>+++ b/perl/p5-devel-nytprof/Portfile
</span><span style='display:block; white-space:pre;background:#e0e0e0;'>@@ -4,6 +4,7 @@ PortGroup           perl5 1.0
</span> 
 perl5.branches      5.26 5.28
 perl5.setup         Devel-NYTProf 6.06
<span style='display:block; white-space:pre;background:#e0ffe0;'>+revision            1
</span> license             {Artistic-1 GPL}
 maintainers         nomaintainer
 
<span style='display:block; white-space:pre;background:#e0e0e0;'>@@ -49,9 +50,11 @@ if {${perl5.major} != ""} {
</span>                     port:p${perl5.major}-test-pod \
                     port:p${perl5.major}-test-pod-coverage
 
<span style='display:block; white-space:pre;background:#ffe0e0;'>-    patchfiles      patch-Makefile.PL.diff
</span><span style='display:block; white-space:pre;background:#e0ffe0;'>+    patchfiles      patch-Makefile.PL.diff \
</span><span style='display:block; white-space:pre;background:#e0ffe0;'>+                    patch-bin-nytprofhtml.diff
</span> 
     post-patch {
         reinplace "s|__MP_CPP__|${configure.cpp}|" ${worksrcpath}/Makefile.PL
<span style='display:block; white-space:pre;background:#e0ffe0;'>+        reinplace "s|__MP_PERL5_MAJOR__|${perl5.major}|" ${worksrcpath}/bin/nytprofhtml
</span>     }
 }
<span style='display:block; white-space:pre;color:#808080;'>diff --git a/perl/p5-devel-nytprof/files/patch-bin-nytprofhtml.diff b/perl/p5-devel-nytprof/files/patch-bin-nytprofhtml.diff
</span>new file mode 100644
<span style='display:block; white-space:pre;color:#808080;'>index 0000000..8eeaac3
</span><span style='display:block; white-space:pre;background:#ffe0e0;'>--- /dev/null
</span><span style='display:block; white-space:pre;background:#e0e0ff;'>+++ b/perl/p5-devel-nytprof/files/patch-bin-nytprofhtml.diff
</span><span style='display:block; white-space:pre;background:#e0e0e0;'>@@ -0,0 +1,40 @@
</span><span style='display:block; white-space:pre;background:#e0ffe0;'>+Use (only) MacPorts-installed scripts which are suffixed
</span><span style='display:block; white-space:pre;background:#e0ffe0;'>+with `${perl_version}` (e.g. `nytprofcalls-5.28`);
</span><span style='display:block; white-space:pre;background:#e0ffe0;'>+don't use scripts on PATH
</span><span style='display:block; white-space:pre;background:#e0ffe0;'>+
</span><span style='display:block; white-space:pre;background:#e0ffe0;'>+Ticket: https://trac.macports.org/ticket/56635
</span><span style='display:block; white-space:pre;background:#e0ffe0;'>+
</span><span style='display:block; white-space:pre;background:#e0ffe0;'>+diff --git bin/nytprofhtml bin/nytprofhtml
</span><span style='display:block; white-space:pre;background:#e0ffe0;'>+index a47bfbc..d9bb167 100755
</span><span style='display:block; white-space:pre;background:#e0ffe0;'>+--- bin/nytprofhtml
</span><span style='display:block; white-space:pre;background:#e0ffe0;'>++++ bin/nytprofhtml
</span><span style='display:block; white-space:pre;background:#e0ffe0;'>+@@ -72,16 +72,14 @@ my $has_json = eval { require JSON::MaybeXS; JSON::MaybeXS->import(); 1 }
</span><span style='display:block; white-space:pre;background:#e0ffe0;'>+ 
</span><span style='display:block; white-space:pre;background:#e0ffe0;'>+ my $script_ext   = ($^O eq "MSWin32") ? "" : ".pl";
</span><span style='display:block; white-space:pre;background:#e0ffe0;'>+ 
</span><span style='display:block; white-space:pre;background:#e0ffe0;'>+-my $nytprofcalls = File::Spec->catfile($Config{'bin'}, 'nytprofcalls');
</span><span style='display:block; white-space:pre;background:#e0ffe0;'>+-$nytprofcalls    = which 'nytprofcalls' if not -e $nytprofcalls;
</span><span style='display:block; white-space:pre;background:#e0ffe0;'>++my $nytprofcalls = File::Spec->catfile($Config{'bin'}, 'nytprofcalls-__MP_PERL5_MAJOR__');
</span><span style='display:block; white-space:pre;background:#e0ffe0;'>+ 
</span><span style='display:block; white-space:pre;background:#e0ffe0;'>+-die "Unable to find nytprofcalls in $Config{bin} or on the PATH"
</span><span style='display:block; white-space:pre;background:#e0ffe0;'>++die "Unable to find nytprofcalls in $Config{bin}"
</span><span style='display:block; white-space:pre;background:#e0ffe0;'>+     unless $nytprofcalls;
</span><span style='display:block; white-space:pre;background:#e0ffe0;'>+ 
</span><span style='display:block; white-space:pre;background:#e0ffe0;'>+-my $flamegraph   = File::Spec->catfile($Config{'bin'}, 'flamegraph') . $script_ext;
</span><span style='display:block; white-space:pre;background:#e0ffe0;'>+-$flamegraph      = which "flamegraph$script_ext" if not -e $flamegraph;
</span><span style='display:block; white-space:pre;background:#e0ffe0;'>++my $flamegraph   = File::Spec->catfile($Config{'bin'}, 'flamegraph') . $script_ext . '-__MP_PERL5_MAJOR__';
</span><span style='display:block; white-space:pre;background:#e0ffe0;'>+ 
</span><span style='display:block; white-space:pre;background:#e0ffe0;'>+-die "Unable to find flamegraph$script_ext in $Config{bin} or on the PATH"
</span><span style='display:block; white-space:pre;background:#e0ffe0;'>++die "Unable to find flamegraph$script_ext-__MP_PERL5_MAJOR__ in $Config{bin}"
</span><span style='display:block; white-space:pre;background:#e0ffe0;'>+     unless $flamegraph;
</span><span style='display:block; white-space:pre;background:#e0ffe0;'>+ 
</span><span style='display:block; white-space:pre;background:#e0ffe0;'>+ my @treemap_colors = (0,2,4,6,8,10,1,3,5,7,9);
</span><span style='display:block; white-space:pre;background:#e0ffe0;'>+@@ -116,7 +114,7 @@ DB::set_option('blocks', 0) if $opt_minimal;
</span><span style='display:block; white-space:pre;background:#e0ffe0;'>+ 
</span><span style='display:block; white-space:pre;background:#e0ffe0;'>+ sub usage {
</span><span style='display:block; white-space:pre;background:#e0ffe0;'>+     print <<END;
</span><span style='display:block; white-space:pre;background:#e0ffe0;'>+-usage: [perl] nytprofhtml [opts]
</span><span style='display:block; white-space:pre;background:#e0ffe0;'>++usage: nytprofhtml-__MP_PERL5_MAJOR__ [opts]
</span><span style='display:block; white-space:pre;background:#e0ffe0;'>+  --file <file>, -f <file>  Read profile data from the specified file [default: nytprof.out]
</span><span style='display:block; white-space:pre;background:#e0ffe0;'>+  --out <dir>,   -o <dir>   Write report files to this directory [default: nytprof]
</span><span style='display:block; white-space:pre;background:#e0ffe0;'>+  --delete,      -d         Delete any old report files in <dir> first
</span></pre><pre style='margin:0'>

</pre>