Code:
proc iRCDELUSER {nick uhost hand chan args} {
global ioBvar
if { ($chan == "#yourchanname") && ([ioB:istrusted $uhost]) } {
catch { set ee [::ftp::Quote $ioBvar(ftp) SITE DELUSER [lindex $args 0]] } result
set lines [split $ee "\n"]
foreach line $lines {
putquick "PRIVMSG $chan :$line"
}
}
return
}