Changeset 32525

Timestamp:

01/06/2008 14:38:34 (4 years ago)

Author:

eridius@…

Message:

Change the ui_prefix if-else block to a try-catch block

Files:

• trunk/base/src/macports1.0/macports.tcl (modified) (1 diff)

trunk/base/src/macports1.0/macports.tcl

@@ -112 +112 @@
         proc ::ui_$priority {str} {}
     } else {
-        if {[llength [info commands ui_prefix]] > 0} {
+        try {
             set prefix [ui_prefix $priority]
-        } else {
+        } catch * {
             set prefix [ui_prefix_default $priority]
         }