Ignore:
Timestamp:
Jan 12, 2004, 11:13:29 AM (15 years ago)
Author:
jkh
Message:

Centralize the setting of UI_PREFIX so it can also be overridden in one place for
automated scripts (which need to mark the stages with some sort of unique marker).
This is also a lot cleaner than what we had before, were each module could
set it to any value it liked and wreak havoc with the output.

File:
1 edited

Legend:

Unmodified
Added
Removed
  • trunk/base/src/port1.0/portutil.tcl

    r4473 r4598  
    11001100    return -code error [format [msgcat::mc "Failed to locate '%s' in path: '%s'"] $binary $env(PATH)];
    11011101}
     1102
     1103# Set the UI prefix to something standard (so it can be grepped for in output)
     1104proc set_ui_prefix {} {
     1105        global UI_PREFIX env
     1106        if {[info exists env(UI_PREFIX)]} {
     1107                set UI_PREFIX $env(UI_PREFIX)
     1108        } else {
     1109                set UI_PREFIX "---> "
     1110        }
     1111}
Note: See TracChangeset for help on using the changeset viewer.