getuser $user "hosts" error

[r0t3n]

error in my userlist:

Tcl error [user_list]: list element in quotes followed by "HOSTS"]" instead of space

The script:

Code: Select all

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!!