This is the new home of the egghelp.org community forum.
All data has been migrated (including user logins/passwords) to a new phpBB version.
For more information, see this announcement post. Click the X in the top right-corner of this box to dismiss this message.
Support & discussion of released scripts, and announcements of new releases.
-
Esben
- Voice
- Posts: 8
- Joined: Sat Oct 15, 2005 7:56 pm
Post
by Esben »
i get this error when i try to use keepout script
Tcl error [::keepout::joinchan]: can't read "arguments": no such variable
Code: Select all
proc keepout::joinchan {nickname hostname handle channel} {
if {[channel get $channel keepout] && ![matchattr $handle $keepout::flags $channel] && [botisop $channel]} {
putquick "MODE $channel +b [ban $hostname]"
set kickmsg [lindex $keepout::kickmsg [rand [llength $keepout::kickmsg]]]
putquick "KICK $channel $nickname :[string map "%nick $nickname %host $hostname %chan $channel" $kickmsg]"
}
}
rest of the script
http://www.nomorepasting.com/paste.php?pasteID=50838
-
Alchera
- Revered One
- Posts: 3344
- Joined: Mon Aug 11, 2003 12:42 pm
- Location: Ballarat Victoria, Australia
-
Contact:
Post
by Alchera »
Wrong forum! Moved!
Add [SOLVED] to the thread title if your issue has been.
Search |
FAQ |
RTM
-
De Kus
- Revered One
- Posts: 1361
- Joined: Sun Dec 15, 2002 11:41 am
- Location: Germany
Post
by De Kus »
error is there
Code: Select all
113 proc keepout::ban {host} {
114 if {![string match *users.quakenet* $host]} {
115 return "[string map "~ *" *!$host]"
116 } else {
117 return "*!*@[lindex [split $arguments] 0]"
118 }
119 }
thats why you should use the '.set errorInfo' for debugging.
De Kus
StarZ|De_Kus, De_Kus or DeKus on IRC
Copyright © 2005-2009 by De Kus - published under
The MIT License
Love hurts, love strengthens...