egghelp/eggheads community Discussion of eggdrop bots, shell accounts and tcl scripts. 2005-06-13T05:51:22-04:00 https://forum.eggheads.org/app.php/feed/topic/9813 2005-06-13T05:51:22-04:00 2005-06-13T05:51:22-04:00 https://forum.eggheads.org/viewtopic.php?p=50721#p50721 <![CDATA[getuser $user "hosts" error]]>
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!!

Statistics: Posted by r0t3n — Mon Jun 13, 2005 5:51 am

]]>