Test::Search::Explain no longer returns TEST_BAD when the IR-Explain-1

database doesn't exist: the test is not "bad" in the IRSpy sense that
other tests at the same level need to be skipped, but has completed
successfully (and determined that Explain is not supported).

diff --git a/lib/ZOOM/IRSpy/Test/Search/Explain.pm b/lib/ZOOM/IRSpy/Test/Search/Explain.pm
index 087b846..7467e26 100644 (file)
--- a/lib/ZOOM/IRSpy/Test/Search/Explain.pm
+++ b/lib/ZOOM/IRSpy/Test/Search/Explain.pm
@@ -55,7 +55,7 @@ sub error {
     update($conn, $category, 0);
     zoom_error_timeout_update($conn, $exception);
 
-    return ZOOM::IRSpy::Status::TEST_BAD
+    return ZOOM::IRSpy::Status::TEST_OK
        if ($exception->code() == 109 || # Database unavailable
            $exception->code() == 235); # Database does not exist