Code: Select all
bind pub - @found found
### found command ###
proc found {nick host hand chan arg} {
foreach utimer [utimers] {
if {[string match $mytimer [lindex $utimer 2]]} {
killutimer $mytimer
}
Code: Select all
set mytimer "foo"
bind pub - @found found
proc found {nick host hand chan arg} {
global mytimer
foreach utimer [utimers] {
if {[string match "$mytimer" "[lindex $utimer 2]"]} {
killutimer $mytimer
}
}
}