From: Mike Taylor Date: Tue, 11 Jul 2006 14:16:06 +0000 (+0000) Subject: Tweak X-Git-Tag: CPAN-v1.02~54^2~1145 X-Git-Url: http://git.indexdata.com/?p=irspy-moved-to-github.git;a=commitdiff_plain;h=923cb9cddef1371e9bc9b87406ee56db31f446f7 Tweak --- diff --git a/lib/ZOOM/IRSpy/Test/Ping.pm b/lib/ZOOM/IRSpy/Test/Ping.pm index 590b94d..36b4b1f 100644 --- a/lib/ZOOM/IRSpy/Test/Ping.pm +++ b/lib/ZOOM/IRSpy/Test/Ping.pm @@ -1,4 +1,4 @@ -# $Id: Ping.pm,v 1.4 2006-06-21 16:26:29 mike Exp $ +# $Id: Ping.pm,v 1.5 2006-07-11 14:16:06 mike Exp $ # See the "Main" test package for documentation @@ -30,7 +30,7 @@ sub connected { my $rec = $irspy->record($conn); $irspy->log("irspy_test", $conn->option("host"), " connected"); - ### Note the successful connection in $rec + ### At this point we should note the successful connection in $rec return 0; } diff --git a/lib/ZOOM/IRSpy/Test/Search/Title.pm b/lib/ZOOM/IRSpy/Test/Search/Title.pm index b531c8f..122b170 100644 --- a/lib/ZOOM/IRSpy/Test/Search/Title.pm +++ b/lib/ZOOM/IRSpy/Test/Search/Title.pm @@ -1,4 +1,4 @@ -# $Id: Title.pm,v 1.1 2006-06-21 16:27:01 mike Exp $ +# $Id: Title.pm,v 1.2 2006-07-11 14:16:35 mike Exp $ # See the "Main" test package for documentation @@ -33,7 +33,7 @@ sub found { my $n = $rs->size(); $irspy->log("irspy_test", $conn->option("host"), " title search found $n record", $n==1 ? "" : "s"); - ### Note the success or failure of the search in $rec + ### We should note the success or failure of the search in $rec return 0; }