#by wiebe @ QuakeNet
#requires autovoiceall.tcl



#help autovoiceall msg
bind msgm mn|mn "help autovoiceall" c_autovoiceall:help:msg

proc c_autovoiceall:help:msg { nick uhost handle text } {
  if { [catch {autovoiceall:msg $nick $uhost $handle ""} error] } {
     putlog "ERROR using autovoiceall.tcl, perhaps you have not loaded it?"
     error $error
  }
  putcmdlog "($nick!$uhost) !$handle! $text"
}



#autovoiceall msg
bind msg mn|mn autovoiceall c_autovoiceall:msg

proc c_autovoiceall:msg { nick uhost handle text } {
  if { [catch {autovoiceall:msg $nick $uhost $handle $text} error] } {
     putlog "ERROR using autovoiceall.tcl, perhaps you have not loaded it?"
     error $error
  }
  return 1
}