Changeset 225 for trunk/base

Timestamp:

Aug 21, 2002, 8:01:11 AM (22 years ago)

Author:

jkh

Message:

Actually make ui_error work.

File:

• trunk/base/src/port1.0/portui.tcl (modified) (1 diff)

trunk/base/src/port1.0/portui.tcl

@@ -92 +92 @@
 # Output message unconditionally as an error message.
 proc ui_error {str} {
-    ui_puts Error: $str
+    ui_puts "Error: $str"
 }