[52909] branches/gsoc09-logging/base/src/macports1.0/macports.tcl

[enl at macports.org]

Revision: 52909
          http://trac.macports.org/changeset/52909
Author:   enl at macports.org
Date:     2009-06-25 12:32:14 -0700 (Thu, 25 Jun 2009)
Log Message:
-----------
small bugfix

Modified Paths:
--------------
    branches/gsoc09-logging/base/src/macports1.0/macports.tcl

Modified: branches/gsoc09-logging/base/src/macports1.0/macports.tcl
===================================================================
--- branches/gsoc09-logging/base/src/macports1.0/macports.tcl	2009-06-25 19:30:52 UTC (rev 52908)
+++ branches/gsoc09-logging/base/src/macports1.0/macports.tcl	2009-06-25 19:32:14 UTC (rev 52909)
@@ -132,7 +132,7 @@
 proc ui_message {priority prefix stage args} {
     global macports::channels ::debuglog
     foreach chan $macports::channels($priority) {
-        if {$chan == $::debuglog} {
+        if {[info exists $::debuglog] && $chan == $::debuglog} {
             set strprefix ":$priority:$stage "
             if {[lindex $args 0] == "-nonewline"} {
                 puts -nonewline $chan "$strprefix[lindex $args 1]"
-------------- next part --------------
An HTML attachment was scrubbed...
URL: <http://lists.macosforge.org/pipermail/macports-changes/attachments/20090625/98669d46/attachment.html>