[83724] trunk/dports/_resources/port1.0/group/perl5-1.0.tcl

[ricci at macports.org]

Revision: 83724
          http://trac.macports.org/changeset/83724
Author:   ricci at macports.org
Date:     2011-09-09 12:37:39 -0700 (Fri, 09 Sep 2011)
Log Message:
-----------
add the global prefix var to the perl5 group perl5_get_default_branch function so it
  can find the installed perl5 binary and thus pick the right version of
  perl modules to build.

Modified Paths:
--------------
    trunk/dports/_resources/port1.0/group/perl5-1.0.tcl

Modified: trunk/dports/_resources/port1.0/group/perl5-1.0.tcl
===================================================================
--- trunk/dports/_resources/port1.0/group/perl5-1.0.tcl	2011-09-09 19:31:31 UTC (rev 83723)
+++ trunk/dports/_resources/port1.0/group/perl5-1.0.tcl	2011-09-09 19:37:39 UTC (rev 83724)
@@ -42,6 +42,7 @@
 default perl5.branches {"5.8 5.10 5.12 5.14"}
 default perl5.default_branch {[perl5_get_default_branch]}
 proc perl5_get_default_branch {} {
+    global prefix
     # use whatever ${prefix}/bin/perl5 was chosen, and if none, fall back to 5.12
     if {![catch {set val [lindex [split [exec ${prefix}/bin/perl5 -V:version] {'}] 1]}]} {
         return [join [lrange [split $val .] 0 1] .]
-------------- next part --------------
An HTML attachment was scrubbed...
URL: <http://lists.macosforge.org/pipermail/macports-changes/attachments/20110909/44e67693/attachment.html>