Quick test includes Record::OPAC rather than Record::Fetch

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

diff --git a/lib/ZOOM/IRSpy/Test/Ping.pm b/lib/ZOOM/IRSpy/Test/Ping.pm
index e230b3b..31b7f4d 100644 (file)
--- a/lib/ZOOM/IRSpy/Test/Ping.pm
+++ b/lib/ZOOM/IRSpy/Test/Ping.pm
@@ -1,4 +1,3 @@
-# $Id: Ping.pm,v 1.27 2007-05-09 11:19:36 mike Exp $
 
 # See the "Main" test package for documentation
 
@@ -89,7 +88,7 @@ sub connected {
 sub not_connected {
     my($conn, $__UNUSED_task, $__UNUSED_udata, $exception) = @_;
 
-    $conn->log("irspy_test", "not connected: $exception");
+    $conn->log("irspy", "not connected: $exception");
     $conn->record()->store_result("probe",
                                  ok => 0,
                                  errcode => $exception->code(),