Can someone check what is wrong in this script ?

[Danik]

###stick <IP> | stick <IP>###

Code: Select all

proc pub:stick {nick uhost hand chan txt} {
  set txt [split $txt]
  set who [lindex $txt 0]
  if {[isbotnick $who]} { return }
  if {$who == ""} { 
   puthelp "NOTICE $nick : Corect use !stick <nick>"
  return 0
  }
  stick "ban $txt $chan"
  return 1
}

it is a script for sticky bans

Edited: Placed code within a suitable code-block.

/NML_375

[arfer]

As far as I'm aware the Eggdrop Tcl command 'stick' is for making an existing ban sticky and takes one or two arguments

stick <banmask> ?channel?

So, what are you trying to do? Set a sticky ban or make an existing ban sticky?

In any case your use of the 'stick' command is incorrect.