.die <reason>

[Cristian]

Code: Select all

; .die <reason>
; .die

bind PUB n .die pub_die
proc pub_die {nick uhost hand chan text} {
       if {$text != ""} {
              die [lrange [split $text] 0 end]
       } else {
              die
       }
}