Explorar o código

Replace BT.PrvCmds.tcl

BLaCkShaDoW %!s(int64=5) %!d(string=hai) anos
pai
achega
e078868153
Modificáronse 1 ficheiros con 10 adicións e 0 borrados
  1. 10 0
      BlackTools/Commands/BT.PrvCmds.tcl

+ 10 - 0
BlackTools/Commands/BT.PrvCmds.tcl

@@ -39,6 +39,16 @@ if {[validchan $mychan] && [matchattr $hand nmo|OVMA $mychan] && ![string equal
 }
 
 switch [string tolower $cmd] {
+vote {
+	set type 2
+	set word [lindex [split $arg] 1]
+    set text [join [lrange [split $arg] 2 end]]
+    set id [lindex [split $arg] 2]
+	set opt [lindex [split $arg] 3]
+	set vote_next [lindex [split $arg] 4]
+	vote:process $nick $input $host $hand $chan $chan $type [list $word $text $id $opt $vote_next]
+}
+
 alias {
 if {[matchattr $hand mno|MAO $chan]} {
 	set type 2