Code: Select all
set input "Help"
set c_list "OperHelp Help Mirc"
if {[string match -nocase "$input" "$c_list"]} {
Code: Select all
set input "Help"
set c_list "OperHelp Help Mirc"
proc update:list {} {
global input c_list
if {[string match -nocase "$input" "$c_list"]} {
set position [lsearch -exact $c_list $input]
set c_list [lreplace $c_list $position $position]
}
}
Since we are talking about strings this is NOT the way to go..Dedan wrote:this might work:
give it a tryCode: Select all
set input "Help" set c_list "OperHelp Help Mirc" proc update:list {} { global input c_list if {[string match -nocase "$input" "$c_list"]} { set position [lsearch -exact $c_list $input] set c_list [lreplace $c_list $position $position] } }
Nothing I could say that hasn't already been said here in the forum,Dedan wrote:Thanks strikelight.
Would you care to expand on the subject?
Sounds like a good candidate for the FAQ section.