Explorar o código

add nicer logging

James Seward %!s(int64=20) %!d(string=hai) anos
pai
achega
8b3b9c66a1
Modificáronse 1 ficheiros con 2 adicións e 1 borrados
  1. 2 1
      ProxyCheck/proxycheck.tcl

+ 2 - 1
ProxyCheck/proxycheck.tcl

@@ -107,7 +107,8 @@ proc proxycheck_check3 { ip host status nick orighost channel rbl } {
       return 0
     }
     set proxycheck_lastip $ip
-    putlog "proxycheck: got host $host = ip $ip from RBL $rbl ... banning"
+    putloglev d * "proxycheck: got host $host = ip $ip from RBL $rbl ... banning"
+		putlog "proxycheck: $nick ($orighost) is listed in $rbl ... banning from $channel"
     newchanban $channel "*@$orighost" "proxychk" "proxycheck: $rbl" $proxycheck_bantime
   }
   #if we didn't get a host, they're not in RBL