cleaner Voice
Joined: 13 Apr 2009 Posts: 15
|
Posted: Fri Sep 18, 2009 3:53 pm Post subject: !userlist doesn't work |
|
|
Hello,
I have superscript.tcl and this part doesn't work...
It doesn't show user list.
Please help me.
| Code: | #userlist
proc pub_do_users {nick uhost hand chan text} {
puthelp "PRIVMSG $nick :- \037\002User List\002\037"
foreach {a b c d} [userlist $chan] {
puthelp "PRIVMSG $nick :- [format %-12s%-12s%-12s%-12s $a $b $c $d]"
}
puthelp "PRIVMSG $nick :- \037\002User List Completed\002\037"
}
#end of userlist |
|
|