vars with "-" not beening read

[Dedan]

It seems that i can not get the egg to read
any var that has a "-" in it.

is this a common syntax error?

Code: Select all

set found-codes 1

bind pubm -|- "*" protect:channel
proc protect:channel {nick uhost handle channel text} {
  global botnick found-codes
  set chan [string tolower $channel]
  if {![botisop $chan] || [isop $nick $chan]} {return 0}
  puthelp "PRIVMSG $chan :code count is $found-codes"
}

[03:58] Tcl error [protect:channel]: can't read "found": no such variable



please help

[user]

escape it by enclosing the variable name in {}'s or use set to retrieve the value:

eg: ${botnet-nick} or [set botnet-nick]

[Dedan]

what are you escaping?

[user]

what are you escaping?

"the name is a sequence of one or more characters that are a letter, digit, underscore, or namespace separators (two or more colons)."
- http://tcl.tk/man/tcl8.4/TclCmd/Tcl.htm#M11

[Dedan]

so, tcl has a problem with vars that have a "-" in them?


what about all those in th conf file?

[user]

so, tcl has a problem with vars that have a "-" in them?
what about all those in th conf file?

Tcl doesn't have a problem with them. Some users have a problem addressing them the right way though
You can use any char you like in a variable name, but the $ parser is a bit picky. (like I mentioned in my previous post)

Using "-" in a variable name only leads to extra work when you want variable substitution, so why don't you use "_" instead or start using 'set' to retrieve the value?

I've no idea why the eggdrop developers chose to use "-"