# HG changeset patch
# User Matti Hamalainen <ccr@tnsp.org>
# Date 1251652359 -10800
# Node ID cbe5761897f438d02d1c04526db11556c24b0600
# Parent  4362bf9e52e475f8a83133af867ca6f48c175f76
Use ("No", "Queue", "Sent") for DroneBL information in status reports.

diff -r 4362bf9e52e4 -r cbe5761897f4 maltfilter
--- a/maltfilter	Sun Aug 30 17:14:09 2009 +0300
+++ b/maltfilter	Sun Aug 30 20:12:39 2009 +0300
@@ -379,6 +379,8 @@
   "#777",
 );
 
+my @drone_status = ("No", "Queue", "Sent");
+
 sub print_table2($$$$$$)
 {
   my ($m, $f, $table, $keys, $func, $class) = @_;
@@ -405,7 +407,7 @@
     printElem(!$m, $f, " | ");
     printTD($m, $f, sprintf("%-8d ", $table->{$_[0]}{"hits"}), $blocked);
     printElem(!$m, $f, " | ");
-    printTD($m, $f, sprintf("%-6s ", $table->{$_[0]}{"dronebl"}), $blocked);
+    printTD($m, $f, sprintf("%-6s ", $drone_status[$table->{$_[0]}{"dronebl"}]), $blocked);
     printElem(!$m, $f, " | ");
     printTD($m, $f, get_ago_str($table->{$_[0]}{"date1"}), $blocked);
     printElem(!$m, $f, " | ");
@@ -590,7 +592,7 @@
     } elsif ($type eq "error") {
       # If we don't have a valid key, disable further submissions.
       if ($msg =~ /<code>403<\/code>/) {
-        mlog(-1, "Disabling DroneBL submission due to invalid key.\n");
+        mlog(-1, "[DroneBL] Disabling submissions due to invalid key.\n");
         $settings{"DRONEBL"} = 0;
       } else {
         $dronebl_errors++;