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

[cal at macports.org]

Revision: 102935
          https://trac.macports.org/changeset/102935
Author:   cal at macports.org
Date:     2013-02-10 18:08:29 -0800 (Sun, 10 Feb 2013)
Log Message:
-----------
remove static and/or unhelpful debug messages, improve warning when a portgroup wasn't found

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

Modified: trunk/base/src/port1.0/portutil.tcl
===================================================================
--- trunk/base/src/port1.0/portutil.tcl	2013-02-11 02:06:25 UTC (rev 102934)
+++ trunk/base/src/port1.0/portutil.tcl	2013-02-11 02:08:29 UTC (rev 102935)
@@ -2093,9 +2093,7 @@
     foreach target $args {
         set origproc [ditem_key $ditem procedure]
         set ident [ditem_key $ditem name]
-        if {[info commands $target] != ""} {
-            ui_debug "$ident registered provides '$target', a pre-existing procedure. Target override will not be provided"
-        } else {
+        if {[info commands $target] == ""} {
             proc $target {args} "
                 variable proc_index
                 set proc_index \[llength \[ditem_key $ditem proc\]\]
@@ -2378,10 +2376,9 @@
     set groupFile [getportresourcepath $porturl "port1.0/group/${group}-${version}.tcl"]
 
     if {[file exists $groupFile]} {
-        ui_debug "Using group file $groupFile"
         uplevel "source $groupFile"
     } else {
-        ui_warn "Group file could not be located."
+        ui_warn "PortGroup ${group} ${version} could not be located. ${group}-${version}.tcl does not exist."
     }
 }
 
-------------- next part --------------
An HTML attachment was scrubbed...
URL: <http://lists.macosforge.org/pipermail/macports-changes/attachments/20130210/40fb14d6/attachment.html>