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