[117121] trunk/base/src/port1.0/portutil.tcl

[jmr at macports.org]

Revision: 117121
          https://trac.macports.org/changeset/117121
Author:   jmr at macports.org
Date:     2014-02-16 18:17:36 -0800 (Sun, 16 Feb 2014)
Log Message:
-----------
put a list of portgroups used in PortInfo

Modified Paths:
--------------
    trunk/base/src/port1.0/portutil.tcl

Modified: trunk/base/src/port1.0/portutil.tcl
===================================================================
--- trunk/base/src/port1.0/portutil.tcl	2014-02-17 00:55:33 UTC (rev 117120)
+++ trunk/base/src/port1.0/portutil.tcl	2014-02-17 02:17:36 UTC (rev 117121)
@@ -2569,8 +2569,10 @@
 
 # Use a specified group/version.
 proc PortGroup {group version} {
-    global porturl
+    global porturl PortInfo
 
+    lappend PortInfo(portgroups) [list $group $version]
+
     set groupFile [getportresourcepath $porturl "port1.0/group/${group}-${version}.tcl"]
 
     if {[file exists $groupFile]} {
-------------- next part --------------
An HTML attachment was scrubbed...
URL: <https://lists.macosforge.org/pipermail/macports-changes/attachments/20140216/d9d28feb/attachment.html>