TCL needed help

awyeah · Post by **awyeah** » Mon Sep 27, 2004 5:59 am

Weird it shouldn't happen though, hmm.

Type:

.tcl set errorInfo

in DCC and paste me the results.

WeiJie · Post by **WeiJie** » Mon Sep 27, 2004 6:54 am

<Bot> What? You need '.help'

Mmm... Does the TCL detect fake quit msg too?
Etc.

* Quits: Eggy (egg@egghelp.org) (Quit (boston.ma.us.galaxynet.org singnet.sg.galaxynet.org))

awyeah · Post by **awyeah** » Mon Sep 27, 2004 7:36 am

Fake quit messages will not be detected, as I have set llength of the reason to be 2, and lindex 2 to be null. So fake quit messages will be ignored as they will have more than 2 indexes, lindex 2 i.e. and the length of the list will be also greater than 2, i.e. 3 or more.

For the .tcl to work in DCC you need to comment the unbind dcc:tcl bind in the .conf file. (Add an # infront of it).

# Comment these two lines if you wish to enable the .tcl and .set commands.
# If you select your owners wisely, you should be okay enabling these.
#unbind dcc n tcl *dcc:tcl
#unbind dcc n set *dcc:set

WeiJie · Post by **WeiJie** » Mon Sep 27, 2004 8:47 am

Hmmm... I added # infront but it still doesn't work...

#Comment these two lines if you wish to enable the .tcl and .set commands.
# If you select your owners wisely, you should be okay enabling these.
#unbind dcc n tcl *dcc:tcl
#unbind dcc n set *dcc:set

awyeah · Post by **awyeah** » Mon Sep 27, 2004 9:12 pm

Restart the bot then try.

WeiJie · Post by **WeiJie** » Mon Sep 27, 2004 11:35 pm

Restarted..

<user> .tcl set errorInfo
<bot> What? You need '.help'

YooHoo · Post by **YooHoo** » Tue Sep 28, 2004 4:26 am

geez...Dude

Read.
Your.
Conf.
File.
every single redundant question has a) been answered already, or b) is well documented either in the conf file, in ~/doc/settings, or, here's the major shocker, in Setting Up Your Eggdrop. You actually have to read them, not just open them up, and say "OK, read em and it didn't help." The answers you seek are already right in front of your eyes

WeiJie · Post by **WeiJie** » Tue Sep 28, 2004 7:37 am

Code: Select all

.tcl set errorInfo

The bot replies,

Tcl: can't read "errorinfo": no such variable
Tcl: while executing
Tcl: "set errorinfo"

greenbear · Post by **greenbear** » Tue Sep 28, 2004 9:37 am

It's 'errorInfo', not 'errorinfo'. CaSe matters.

metroid · Post by **metroid** » Tue Sep 28, 2004 9:45 am

Code: Select all

bind pub n "\$error" tcldebug:error

proc tcldebug:error {nick host hand chan args} {
  foreach line [split $::errorInfo \n] {
    putquick "PRIVMSG $chan :$line"
  }
}

WeiJie · Post by **WeiJie** » Tue Sep 28, 2004 8:20 pm

gb wrote:It's 'errorInfo', not 'errorinfo'. CaSe matters.

<user> .tcl set errorinfo
<bot> Tcl error: can't read "errorinfo": no such variable

WeiJie · Post by **WeiJie** » Tue Sep 28, 2004 8:20 pm

MeTroiD wrote:

Code: Select all

bind pub n "\$error" tcldebug:error

proc tcldebug:error {nick host hand chan args} {
  foreach line [split $::errorInfo \n] {
    putquick "PRIVMSG $chan :$line"
  }
}

Where should I place this at?

awyeah · Post by **awyeah** » Tue Sep 28, 2004 9:46 pm

In an any tcl file and restart the bot, I guess.
But anyway using the same case:

Code: Select all

.tcl set errorInfo

Should definately work!
Did you enable the .set also? If not comment the unbind of that as well!

strikelight · Post by **strikelight** » Tue Sep 28, 2004 9:59 pm

WeiJie wrote:
gb wrote:It's 'errorInfo', not 'errorinfo'. CaSe matters.
<user> .tcl set errorinfo
<bot> Tcl error: can't read "errorinfo": no such variable

What part of "Case Matters" don't you understand?

WeiJie · Post by **WeiJie** » Tue Sep 28, 2004 11:25 pm

Tcl: syntax error in expression "(![info exists netsplit_lock]) && ([lsearch -exact $checkmod"
Tcl: ("if" test expression)
Tcl: while compiling
Tcl: "if {(![info exists netsplit_lock]) && ([lsearch -exact $checkmode "m"] == -1) && ([string match "*.*.galaxynet.org" [lindex $reason 0]]) && ([string m..."
Tcl: (compiling body of proc "netsplit:lock", line 4)
Tcl: invoked from within
Tcl: "netsplit:lock $_stnm1 $_stnm2 $_stnm3 $_stnm4 $_stnm5"