[41043] branches/variant-descs-14482/base/src/port1.0/portutil.tcl

[raimue at macports.org]

Revision: 41043
          http://trac.macports.org/changeset/41043
Author:   raimue at macports.org
Date:     2008-10-21 04:15:16 -0700 (Tue, 21 Oct 2008)
Log Message:
-----------
port1.0/portutil.tcl:
Use getportresourcepath for the group files

Modified Paths:
--------------
    branches/variant-descs-14482/base/src/port1.0/portutil.tcl

Modified: branches/variant-descs-14482/base/src/port1.0/portutil.tcl
===================================================================
--- branches/variant-descs-14482/base/src/port1.0/portutil.tcl	2008-10-21 11:11:44 UTC (rev 41042)
+++ branches/variant-descs-14482/base/src/port1.0/portutil.tcl	2008-10-21 11:15:16 UTC (rev 41043)
@@ -2036,9 +2036,9 @@
 
 # Use a specified group/version.
 proc PortGroup {group version} {
-    global portresourcepath
+    global porturl
 
-    set groupFile ${portresourcepath}/group/${group}-${version}.tcl
+    set groupFile [getportresourcepath $porturl "port1.0/group/${group}-${version}.tcl"]
 
     if {[file exists $groupFile]} {
         uplevel "source $groupFile"
-------------- next part --------------
An HTML attachment was scrubbed...
URL: http://lists.macosforge.org/pipermail/macports-changes/attachments/20081021/e3bafbd1/attachment.html