projects
/
irspy-moved-to-github.git
/ blob
commit
grep
author
committer
pickaxe
?
search:
re
71ff7331b2ba443934ef0909112a679e212ece2d
[irspy-moved-to-github.git]
/
Quick.pm
1
2
package ZOOM::IRSpy::Test::Quick;
3
4
use 5.008;
5
use strict;
6
use warnings;
7
8
use ZOOM::IRSpy::Test;
9
our @ISA = qw(ZOOM::IRSpy::Test);
10
11
sub subtests { qw(Ping Search::Bath Record::Fetch) }
12
13
sub timeout { 20 }
14
15
sub start {
16
my $class = shift();
17
my($conn) = @_;
18
19
$conn->log("irspy_test", "Quick test no-opping");
20
}
21
22
1;