[64642] trunk/base/src/macports1.0/macports.tcl

[jmr at macports.org]

Revision: 64642
          http://trac.macports.org/changeset/64642
Author:   jmr at macports.org
Date:     2010-03-12 09:54:26 -0800 (Fri, 12 Mar 2010)
Log Message:
-----------
fix ui_channels aliasing issue

Modified Paths:
--------------
    trunk/base/src/macports1.0/macports.tcl

Modified: trunk/base/src/macports1.0/macports.tcl
===================================================================
--- trunk/base/src/macports1.0/macports.tcl	2010-03-12 17:52:53 UTC (rev 64641)
+++ trunk/base/src/macports1.0/macports.tcl	2010-03-12 17:54:26 UTC (rev 64642)
@@ -960,7 +960,9 @@
     }
 
     $workername alias ui_prefix ui_prefix
-    $workername alias ui_channels ui_channels
+    if {[llength [info commands ui_channels]] > 0} {
+        $workername alias ui_channels ui_channels
+    }
     
     $workername alias ui_warn_once ui_warn_once
 
-------------- next part --------------
An HTML attachment was scrubbed...
URL: <http://lists.macosforge.org/pipermail/macports-changes/attachments/20100312/a60ccb52/attachment-0001.html>