Thanks a lot in advance!
Lihong
set tcl_prompt1 {puts -nonewline stdout {my fancy new prompt> }}
--
| Don Porter Mathematical and Computational Sciences Division |
| donald...@nist.gov Information Technology Laboratory |
| http://math.nist.gov/~DPorter/ NIST |
|______________________________________________________________________|
Just in case Don's advice doesn't work for you...
If you are changing the prompt within a procedure you
must also be aware that 'tcl_prompt1' is in the global
namespace, so the following will be required :
proc foo {} {
global tcl_prompt1
set tcl_prompt1 {puts -nonewline stdout "myprompt>"}
}
or
proc foo {} {
set ::tcl_prompt1 {puts -nonewline stdout "myprompt>"}
}
cheers,
Shaun