Register the "irspy_data" log-level.

[irspy-moved-to-github.git] / lib / ZOOM / IRSpy.pm

diff --git a/lib/ZOOM/IRSpy.pm b/lib/ZOOM/IRSpy.pm
index 7b7abd2..93b5192 100644 (file)
--- a/lib/ZOOM/IRSpy.pm
+++ b/lib/ZOOM/IRSpy.pm
@@ -65,6 +65,7 @@ BEGIN {
     ZOOM::Log::mask_str("irspy_unhandled");
     ZOOM::Log::mask_str("irspy_test");
     ZOOM::Log::mask_str("irspy_task");
+    ZOOM::Log::mask_str("irspy_data");
 }
 
 sub new {
@@ -641,7 +642,7 @@ sub check {
                my $skipcount = 0;
                while (defined $node->next() &&
                       length($node->next()->address()) >= length($address)) {
-                   $conn->log("irspy_debug", "skipping from '",
+                   $conn->log("irspy_test", "skipping from '",
                               $node->address(), "' to '",
                               $node->next()->address(), "'");
                    $node = $node->next();