<pre style='margin:0'>
Perry E. Metzger (pmetzger) pushed a commit to branch master
in repository macports-ports.

</pre>
<p><a href="https://github.com/macports/macports-ports/commit/f8d4b689135afb8a290c927bcc6e9a2160154b6b">https://github.com/macports/macports-ports/commit/f8d4b689135afb8a290c927bcc6e9a2160154b6b</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 f8d4b68  p5-tcl-tk: remove test-for-tk in Makefile.PL
</span>f8d4b68 is described below

<span style='display:block; white-space:pre;color:#808000;'>commit f8d4b689135afb8a290c927bcc6e9a2160154b6b
</span>Author: Christopher Chavez <chrischavez@gmx.us>
AuthorDate: Tue Jul 17 23:15:20 2018 -0500

<span style='display:block; white-space:pre;color:#404040;'>    p5-tcl-tk: remove test-for-tk in Makefile.PL
</span><span style='display:block; white-space:pre;color:#404040;'>    
</span><span style='display:block; white-space:pre;color:#404040;'>    uses same workaround as p5-tcl-ptk
</span><span style='display:block; white-space:pre;color:#404040;'>    cf. https://trac.macports.org/ticket/56825
</span><span style='display:block; white-space:pre;color:#404040;'>    
</span><span style='display:block; white-space:pre;color:#404040;'>    remove extra trailing newlines
</span>---
 perl/p5-tcl-tk/Portfile                     | 14 ++++++++---
 perl/p5-tcl-tk/files/patch-Makefile.PL.diff | 39 +++++++++++++++++++++++++++++
 2 files changed, 49 insertions(+), 4 deletions(-)

<span style='display:block; white-space:pre;color:#808080;'>diff --git a/perl/p5-tcl-tk/Portfile b/perl/p5-tcl-tk/Portfile
</span><span style='display:block; white-space:pre;color:#808080;'>index c3eec86..4893bc5 100644
</span><span style='display:block; white-space:pre;background:#e0e0ff;'>--- a/perl/p5-tcl-tk/Portfile
</span><span style='display:block; white-space:pre;background:#e0e0ff;'>+++ b/perl/p5-tcl-tk/Portfile
</span><span style='display:block; white-space:pre;background:#e0e0e0;'>@@ -5,6 +5,7 @@ PortGroup           perl5 1.0
</span> 
 perl5.branches      5.26
 perl5.setup         Tcl-Tk 1.12
<span style='display:block; white-space:pre;background:#e0ffe0;'>+revision            1
</span> 
 platforms           darwin
 supported_archs     noarch
<span style='display:block; white-space:pre;background:#e0e0e0;'>@@ -39,12 +40,17 @@ checksums           rmd160  632740b27d2754fe27209ead0c771fcb5866fc92 \
</span>                     size    331882
 
 if {${perl5.major} != ""} {
<span style='display:block; white-space:pre;background:#ffe0e0;'>-    configure.args-append \
</span><span style='display:block; white-space:pre;background:#ffe0e0;'>-                    --tclsh ${prefix}/bin/tclsh
</span><span style='display:block; white-space:pre;background:#e0ffe0;'>+    # Only used for a test removed by patch;
</span><span style='display:block; white-space:pre;background:#e0ffe0;'>+    # doesn't get stored in configuration
</span><span style='display:block; white-space:pre;background:#e0ffe0;'>+    #configure.args-append \
</span><span style='display:block; white-space:pre;background:#e0ffe0;'>+    #               --tclsh ${prefix}/bin/tclsh
</span><span style='display:block; white-space:pre;background:#e0ffe0;'>+
</span>     depends_lib-append \
                     port:p${perl5.major}-tcl \
                     port:tk \
                     port:tklib
<span style='display:block; white-space:pre;background:#e0ffe0;'>+    # Bypass the test-for-tk since it doesn't work from MacPorts
</span><span style='display:block; white-space:pre;background:#e0ffe0;'>+    # (Perl never gets any output from tclsh for some reason)
</span><span style='display:block; white-space:pre;background:#e0ffe0;'>+    patchfiles-append \
</span><span style='display:block; white-space:pre;background:#e0ffe0;'>+                    patch-Makefile.PL.diff
</span> }
<span style='display:block; white-space:pre;background:#ffe0e0;'>-
</span><span style='display:block; white-space:pre;background:#ffe0e0;'>-
</span><span style='display:block; white-space:pre;color:#808080;'>diff --git a/perl/p5-tcl-tk/files/patch-Makefile.PL.diff b/perl/p5-tcl-tk/files/patch-Makefile.PL.diff
</span>new file mode 100644
<span style='display:block; white-space:pre;color:#808080;'>index 0000000..7479872
</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-tcl-tk/files/patch-Makefile.PL.diff
</span><span style='display:block; white-space:pre;background:#e0e0e0;'>@@ -0,0 +1,39 @@
</span><span style='display:block; white-space:pre;background:#e0ffe0;'>+diff --git Makefile.PL Makefile.PL
</span><span style='display:block; white-space:pre;background:#e0ffe0;'>+index 9fcd993..7de4fae 100755
</span><span style='display:block; white-space:pre;background:#e0ffe0;'>+--- Makefile.PL
</span><span style='display:block; white-space:pre;background:#e0ffe0;'>++++ Makefile.PL
</span><span style='display:block; white-space:pre;background:#e0ffe0;'>+@@ -37,34 +37,6 @@ EOT
</span><span style='display:block; white-space:pre;background:#e0ffe0;'>+ }
</span><span style='display:block; white-space:pre;background:#e0ffe0;'>+ 
</span><span style='display:block; white-space:pre;background:#e0ffe0;'>+ 
</span><span style='display:block; white-space:pre;background:#e0ffe0;'>+-open TCLSH, "$tclsh test-for-tk.tcl|";
</span><span style='display:block; white-space:pre;background:#e0ffe0;'>+-my $res = join '', <TCLSH>;
</span><span style='display:block; white-space:pre;background:#e0ffe0;'>+-
</span><span style='display:block; white-space:pre;background:#e0ffe0;'>+-unless ($res =~ /^ok1/m) {
</span><span style='display:block; white-space:pre;background:#e0ffe0;'>+-  _die <<EOS;
</span><span style='display:block; white-space:pre;background:#e0ffe0;'>+-
</span><span style='display:block; white-space:pre;background:#e0ffe0;'>+-Your Tcl installation ($tclsh) fails to find Tk package.
</span><span style='display:block; white-space:pre;background:#e0ffe0;'>+-One of possible reasons is missing file 'pkgIndex.tcl' in ..../tk8.4/
</span><span style='display:block; white-space:pre;background:#e0ffe0;'>+-directory; Please check if you can feed 'package require Tk' to tclsh
</span><span style='display:block; white-space:pre;background:#e0ffe0;'>+-EOS
</span><span style='display:block; white-space:pre;background:#e0ffe0;'>+-}
</span><span style='display:block; white-space:pre;background:#e0ffe0;'>+-
</span><span style='display:block; white-space:pre;background:#e0ffe0;'>+-unless ($res =~ /^ok2/m) {
</span><span style='display:block; white-space:pre;background:#e0ffe0;'>+-  warn <<EOS;
</span><span style='display:block; white-space:pre;background:#e0ffe0;'>+-
</span><span style='display:block; white-space:pre;background:#e0ffe0;'>+-Your Tk installation fails to find 'snit' package.
</span><span style='display:block; white-space:pre;background:#e0ffe0;'>+-Some old copy of snit1 will be used. The correct one is prefered.
</span><span style='display:block; white-space:pre;background:#e0ffe0;'>+-EOS
</span><span style='display:block; white-space:pre;background:#e0ffe0;'>+-}
</span><span style='display:block; white-space:pre;background:#e0ffe0;'>+-
</span><span style='display:block; white-space:pre;background:#e0ffe0;'>+-unless ($res =~ /^ok3/m) {
</span><span style='display:block; white-space:pre;background:#e0ffe0;'>+-  warn <<EOS;
</span><span style='display:block; white-space:pre;background:#e0ffe0;'>+-
</span><span style='display:block; white-space:pre;background:#e0ffe0;'>+-Your Tk installation fails to find 'tklib' package. This package is recommended,
</span><span style='display:block; white-space:pre;background:#e0ffe0;'>+-otherwise we'll substitute some older version.
</span><span style='display:block; white-space:pre;background:#e0ffe0;'>+-Be informed on this and better have this package installed within your Tcl/Tk.
</span><span style='display:block; white-space:pre;background:#e0ffe0;'>+-EOS
</span><span style='display:block; white-space:pre;background:#e0ffe0;'>+-}
</span><span style='display:block; white-space:pre;background:#e0ffe0;'>+ 
</span><span style='display:block; white-space:pre;background:#e0ffe0;'>+ WriteMakefile(
</span><span style='display:block; white-space:pre;background:#e0ffe0;'>+     NAME => "Tcl::Tk",
</span></pre><pre style='margin:0'>

</pre>