egghelp/eggheads community

can not unset var, no such var

2003-10-21T00:30:49-04:00

this script is running now in a room with
100's of lines of text being read by the eggdrop.
there are NO error messages unless there are
characters as i described.
the error messages happen when the text is posted 1 time.

there is no other common denominator.

and yet we still have not seen the output of '.tcl set errorInfo' when an error occurs................. .......... .............. ..............

Statistics: Posted by strikelight — Tue Oct 21, 2003 12:30 am

can not unset var, no such var

2003-10-21T00:28:31-04:00

this script is running now in a room with
100's of lines of text being read by the eggdrop.
there are NO error messages unless there are
characters as i described.
the error messages happen when the text is posted 1 time.

there is no other common denominator.

Statistics: Posted by Dedan — Tue Oct 21, 2003 12:28 am

can not unset var, no such var

2003-10-21T00:24:33-04:00

if i chage the "rp:dec" as you suggested
the error messages will stop, but the bug still remains.
and that is, the var is NOT being set when
those characters are present in the text.

any character that is not a-Z 0-9 seems to
stop the script from setting the var

I can tell you that is not the case... as you should see from your own code... the error was generated from the timer call... your variable IS being set, as your code:

Code:

    if {![info exists rp_ctr($text)]} {set rp_ctr($text) 0}     incr rp_ctr($text) 1     utimer $rp_seconds [list rp:dec $text]

did NOT generate any error for you. If it was NOT being set, your "incr" statement would be error'ing on you.

Statistics: Posted by strikelight — Tue Oct 21, 2003 12:24 am

can not unset var, no such var

2003-10-21T00:18:04-04:00

if i chage the "rp:dec" as you suggested
the error messages will stop, but the bug still remains.
and that is, the var is NOT being set when
those characters are present in the text.

any character that is not a-Z 0-9 seems to
stop the script from setting the var

Statistics: Posted by Dedan — Tue Oct 21, 2003 12:18 am

can not unset var, no such var

2003-10-20T18:34:09-04:00

it happens when un-special characters
are in the text like ":" . ">>" , or "=)" are in the text

Statistics: Posted by Dedan — Mon Oct 20, 2003 6:34 pm

can not unset var, no such var

2003-10-20T18:32:49-04:00

I still do not see a new example yet.... with the text that triggers the script, and with the generated error, and the output of '.tcl set errorInfo'....

are you sure you want help?

Statistics: Posted by strikelight — Mon Oct 20, 2003 6:32 pm

can not unset var, no such var

2003-10-20T18:34:30-04:00

edited

Statistics: Posted by Dedan — Mon Oct 20, 2003 6:24 pm

can not unset var, no such var

2003-10-20T18:19:44-04:00

like i said before:
i am getting these erors when the text is only posted 1 time,
and only when there are special charaters in the text.

Then I SUGGEST you give a different example, because the example you DID give does NOT contain any special characters that would result in any error.

Also, when the error occurs, doing '.tcl set errorInfo' in the partyline would also be of some benefit.

Statistics: Posted by strikelight — Mon Oct 20, 2003 6:19 pm

can not unset var, no such var

2003-10-20T18:11:48-04:00

like i said before:
i am getting these erors when the text is only posted 1 time,
and only when there are special charaters in the text.

Statistics: Posted by Dedan — Mon Oct 20, 2003 6:11 pm

can not unset var, no such var

2003-10-20T17:47:12-04:00

this is part of a 300 line script, this is the last bug.
I would like to find out why i am getting these
erors when the text is only posted 1 time,
and only when there are special charaters
in the text.

Welp...
the error:

[23:32] Tcl error in script for 'timer395':
[23:32] can't read "rp_ctr(Away Duration: 10hrs 29mins 57secs «Log: ON»)": no such element in array

Is generated from your 'incr rp_ctrl($text) -1' call.... not the unset...

I would change your proc to:

Code:

proc rp:dec {text} {   global rp_ctr  if {[info exists rp_ctr($text)]} {    incr rp_ctr($text) -1     if {$rp_ctr($text) <= "0"} {unset rp_ctr($text)}  }  return 0 }

Statistics: Posted by strikelight — Mon Oct 20, 2003 5:47 pm

can not unset var, no such var

2003-10-20T17:42:03-04:00

this is part of a 300 line script, this is the last bug.
I would like to find out why i am getting these
erors when the text is only posted 1 time,
and only when there are special charaters
in the text.

Statistics: Posted by Dedan — Mon Oct 20, 2003 5:42 pm

can not unset var, no such var

2003-10-20T17:27:01-04:00

If all you are after is a repeat kicking script, my norepeats.tcl is in the archive here, which you can take a look at.

Statistics: Posted by strikelight — Mon Oct 20, 2003 5:27 pm

can not unset var, no such var

2003-10-20T17:21:35-04:00

this is happening even when the text is posted
1 time , other text works fine, i do see what you
are saying ... just tell me this,
how are you suppose to make a repeat
kicker without using a proc that unsets ALL vars?

Statistics: Posted by Dedan — Mon Oct 20, 2003 5:21 pm

Re: can not unset var, no such var

2003-10-20T17:17:10-04:00

I seem to running into a problem with special characters
: = ¶ and who knows what other charcters.
all other lines are working just fine
Code:
    if {![info exists rp_ctr($text)]} {set rp_ctr($text) 0}    incr rp_ctr($text) 1    utimer $rp_seconds [list rp:dec $text]proc rp:dec {text} {  global rp_ctr  incr rp_ctr($text) -1  if {$rp_ctr($text) <= "0"} {unset rp_ctr($text)}  return 0}
[23:32] Tcl error in script for 'timer395':
[23:32] can't read "rp_ctr(Away Duration: 10hrs 29mins 57secs «Log: ON»)": no such element in array

any ideas?

thanks for the help

The problem is not with the chars, it is with repeat calls to rp:dec via the utimer with the same text. Perhaps you should add a check to see if you already have a utimer call for the text in question?

Statistics: Posted by strikelight — Mon Oct 20, 2003 5:17 pm

can not unset var, no such var

2003-10-20T17:00:10-04:00

I seem to running into a problem with special characters
: = ¶ and who knows what other charcters.
all other lines are working just fine

Code:

    if {![info exists rp_ctr($text)]} {set rp_ctr($text) 0}    incr rp_ctr($text) 1    utimer $rp_seconds [list rp:dec $text]proc rp:dec {text} {  global rp_ctr  incr rp_ctr($text) -1  if {$rp_ctr($text) <= "0"} {unset rp_ctr($text)}  return 0}

[23:32] Tcl error in script for 'timer395':
[23:32] can't read "rp_ctr(Away Duration: 10hrs 29mins 57secs «Log: ON»)": no such element in array

any ideas?

thanks for the help

Statistics: Posted by Dedan — Mon Oct 20, 2003 5:00 pm