i need some help plz

2001-12-15T21:28:00-04:00

thanks ppslim that fixed it.. thanks for the help i appreciate it

SnOoP

Statistics: Posted by Guest — Sat Dec 15, 2001 9:28 pm

i need some help plz

2001-12-13T21:42:00-04:00

changing

set args [join $args]

set args [split [join $args]]

Statistics: Posted by ppslim — Thu Dec 13, 2001 9:42 pm

i need some help plz

2001-12-13T13:06:00-04:00

i'm using badchan 1.0 by Bass of Undernet's #eggdrop (bass@tclslave.net) and it's giving me this error

Tcl error [bc_whois]: unmatched open brace in list

i can't figure out what's wrong with it..
i'm running a windrop version 1.6.3 on win xp..

i found the code that's doing it just don't know how to fix it..

bind raw - 319 bc_whois
proc bc_whois {from key args} {
global bchan bcqueue bcnicks
# putlog "319: $args"
set args [join $args]
set nick [string tolower [lindex $args 1]]
if {[info exists bcnicks($nick)]} {set chan $bcnicks($nick)} {return 0}
set chans [string tolower [lrange $args 2 e]]
if {[lsearch $bchan(exempt) $chan] == -1 && $bchan(global) != ""} {set bans $bchan(global)} {set bans ""}
if {[lsearch $bchan(chans) $chan] > -1} {set bans "$bans $bchan($chan)"}
foreach tok $chans {
set tok [string trimleft $tok ":@+"]
foreach ban $bans {
if {[string match [lindex $ban 0] $tok]} {
putlog "badchan: match! $nick k/b'd from $chan because [lrange $ban 1 e]"
putlog "args: $args, ban: $ban"
if {[onchan $nick $chan]} {newchanban $chan [bmaskhost [getchanhost $nick $chan]] badchan "[lrange $ban 1 e]" 10}
return 0
}
}
}
return 0
}

as far as i can see this is what's causing it.. if someone could tell me how to fix it i'd appreciate it alot : )

thanks
SnOoP

Statistics: Posted by Guest — Thu Dec 13, 2001 1:06 pm

egghelp/eggheads community

i need some help plz

i need some help plz

i need some help plz