Lines Matching refs:new
454 } elseif {[regexp {^\^([^^]*)\^([^^]*)\^?$} $cmd dummy old new]} {
457 regsub -all -- $old $cmd $new cmd
1165 set new [split $errorInfo \n]
1166 set new [join [lrange $new 0 [expr [llength $new] - 6]] \n]
1168 -errorinfo $new $result
1192 # in one of the common forms !!, !<number>, or ^old^new. If
1239 set new [split $errorInfo \n]
1240 set new [join [lrange $new 0 [expr [llength $new] - 6]] \n]
1242 -errorinfo $new $msg
1251 set new [auto_execok $name]
1252 if {[string compare $new ""]} {
1259 return [uplevel exec $redir $new [lrange $args 1 end]]