r0t3n
Owner
Joined: 31 May 2005
Posts: 507
Location: UK
|
 Posted: Mon Jun 13, 2005 5:51 am Post subject: getuser $user "hosts" error |
 |
|
error in my userlist:
Tcl error [user_list]: list element in quotes followed by "HOSTS"]" instead of space
The script:
| Code: | bind pub o|f !userlist user_list
proc user_list {nick uhost hand chan text} {
if {[userlist |amnovf $chan] == ""} {
putserv "NOTICE $nick :No users found in my userlist for $chan "
return 0
}
putquick "NOTICE $nick :Userlist for $chan "
foreach user [userlist |amnovf $chan] {
if {[set usersnick [hand2nick $user]] == ""}
putquick "NOTICE $nick :(( Handle: $user || Nickname: Offline, or not in any of the bots channels. || Host(s): [getuser $user "HOSTS"] || Channel Flags: +[lindex [split [chattr $user $chan] |] 1] ))"
} else {
if {[set usersnick [hand2nick $user]] != ""}
putquick "NOTICE $nick :(( Handle: $user || Nickname: $usersnick || Host(s): [getuser $user "hosts"] || Channel Flags: +[lindex [split [chattr $user $chan] |] 1] ))"
}
putquick "NOTICE $nick :End of list."
}
putlog "Userlist.tcl By Tosser^^ Loaded" |
I dont know whats wrong, i tried [getuser $user "hosts""] but that dont work, please help ;p
Thanks in advance!!
_________________
r0t3n @ #r0t3n @ Quakenet |
|
FAQ
Search
Memberlist
Usergroups
Register
Profile
Log in to check your private messages
Log in
