egghelp/eggheads community

Tcl error [chan_checkon]: extra characters after close-quote

2004-03-26T09:59:58-04:00

lol, when i blame the computer, it returns to me (the flood above....)

Statistics: Posted by Xpert — Fri Mar 26, 2004 9:59 am

Tcl error [chan_checkon]: extra characters after close-quote

2004-03-26T06:27:53-04:00

Oh ****!
Please delete this flood, i didn't mean to

Blame the computer!

Statistics: Posted by user — Fri Mar 26, 2004 6:27 am

Tcl error [chan_checkon]: extra characters after close-quote

2004-03-26T06:01:05-04:00

Yes and no....

Statistics: Posted by Xpert — Fri Mar 26, 2004 6:01 am

Tcl error [chan_checkon]: extra characters after close-quote

2004-03-25T16:35:05-04:00

computer? you meant "mistake" don't you?

Statistics: Posted by caesar — Thu Mar 25, 2004 4:35 pm

Tcl error [chan_checkon]: extra characters after close-quote

2004-03-25T12:34:42-04:00

Woops.... sorry, my computer

Statistics: Posted by Xpert — Thu Mar 25, 2004 12:34 pm

Tcl error [chan_checkon]: extra characters after close-quote

2004-03-25T05:03:21-04:00

Thank you strikelight - it worked!

Statistics: Posted by Guest — Thu Mar 25, 2004 5:03 am

Tcl error [chan_checkon]: extra characters after close-quote

2004-03-24T20:15:07-04:00

Code:

proc chan_checkon {min hour day month year} {   foreach chan [channels] {     if {![botonchan $chan]} {       if{[string match -nocase "#mytestchan" "$chan"]} {         puthelp "PRIVMSG #mytestchan :Not listening on $chan - but not rejoining"         } else {         puthelp "PRIVMSG #mytestchan :Not listening on $chan"       }     }   } }

The error wasn't generated from

Code:

if {[botonchan $chan] == 0} {

it was generated from

Code:

      if{[string match -nocase "#mytestchan" "$chan"]} {

There is a space missing between the "if" and the { ...
change it to:

Code:

      if {[string match -nocase "#mytestchan" "$chan"]} {

Statistics: Posted by strikelight — Wed Mar 24, 2004 8:15 pm

Tcl error [chan_checkon]: extra characters after close-quote

2004-03-24T15:24:01-04:00

Code:

proc chan_checkon {min hour day month year} {   foreach chan [channels] {     if {![botonchan $chan]} {       if{[string match -nocase "#mytestchan" "$chan"]} {         puthelp "PRIVMSG #mytestchan :Not listening on $chan - but not rejoining"         } else {         puthelp "PRIVMSG #mytestchan :Not listening on $chan"       }     }   } }

Statistics: Posted by Xpert — Wed Mar 24, 2004 3:24 pm

Tcl error [chan_checkon]: extra characters after close-quote

2004-03-24T12:17:13-04:00

Thanks for the quick reply - but now I recieve this error message:
Tcl error [chan_checkon]: invalid command name "if{0}"

I'm quite new at TCL so don't know what I'm doing wrong!

Statistics: Posted by Guest — Wed Mar 24, 2004 12:17 pm

Tcl error [chan_checkon]: extra characters after close-quote

2004-03-24T12:11:28-04:00

Try this code:

Code:

proc chan_checkon {min hour day month year} {   foreach chan [channels] {     if {[botonchan $chan] == 0} {       if{[string match -nocase "#mytestchan" "$chan"]} {         puthelp "PRIVMSG #mytestchan :Not listening on $chan - but not rejoining"         } else {         puthelp "PRIVMSG #mytestchan :Not listening on $chan"       }     }   } }

Should worked, not tested

Statistics: Posted by Xpert — Wed Mar 24, 2004 12:11 pm

Tcl error [chan_checkon]: extra characters after close-quote

2004-03-24T11:58:45-04:00

I'm making a little script, that makes my bot rejoin a channel, when it's status is trying (.status)

But there is one channel, I not want it to rejoin...

Code:

proc chan_checkon { min hour day month year } {foreach chan [channels] {if {[botonchan $chan] == 0} {if{[string tolower $chan] == "#mytestchan"} {puthelp "PRIVMSG #mytestchan :Not listening on $chan - but not rejoining"} else {puthelp "PRIVMSG #mytestchan :Not listening on $chan"}}}}

I keep getting this error - think it's at the == "#mytestchan"

What should I do?

Statistics: Posted by Guest — Wed Mar 24, 2004 11:58 am