#########
# Problem is when a split happens it does nothing
# and when any person quits normally, it says
# fake netsplit, can anybody help me
# fix this?
#
# thanks alot - WeirdP

bind sign - * netsplit:detect
proc netsplit:detect { nick host hand chan reason } {
if {[string match *.voltnet.org $reason]} {
set strong [lindex $reason 0]
set weak [lindex $reason 1]
putserv "PRIVMSG $chan : \002Netsplit Detected: $weak\002 split from \002$strong\002"
} else {
putserv "PRIVMSG $chan : \002Fake Netsplit Detected\002"
}
}
putlog "Netsplit Detector Loaded"