From 51cd1348401e8436ff7331258d261d8305f405c3 Mon Sep 17 00:00:00 2001 From: Mike Taylor Date: Fri, 13 Oct 2006 15:16:29 +0000 Subject: [PATCH] New -- used for running tests that are on the infrastructure of IRSpy itself rather than on the targets, since this test completes much more quickly! --- lib/ZOOM/IRSpy/Test/Quick.pm | 21 +++++++++++++++++++++ 1 file changed, 21 insertions(+) create mode 100644 lib/ZOOM/IRSpy/Test/Quick.pm diff --git a/lib/ZOOM/IRSpy/Test/Quick.pm b/lib/ZOOM/IRSpy/Test/Quick.pm new file mode 100644 index 0000000..4c8e70c --- /dev/null +++ b/lib/ZOOM/IRSpy/Test/Quick.pm @@ -0,0 +1,21 @@ +# $Id: Quick.pm,v 1.1 2006-10-13 15:16:29 mike Exp $ + +package ZOOM::IRSpy::Test::Quick; + +use 5.008; +use strict; +use warnings; + +use ZOOM::IRSpy::Test; +our @ISA = qw(ZOOM::IRSpy::Test); + +sub subtests { qw(Ping Search::Title) } + +sub start { + my $class = shift(); + my($conn) = @_; + + $conn->log("irspy_test", "Quick test no-opping"); +} + +1; -- 1.7.10.4