diff options
| author | Lorry Tar Creator <lorry-tar-importer@lorry> | 2015-02-02 15:36:39 +0000 |
|---|---|---|
| committer | Lorry Tar Creator <lorry-tar-importer@lorry> | 2015-02-02 15:36:39 +0000 |
| commit | e2d680ac7c6f0bb36808aa45e1453c8b585d2717 (patch) | |
| tree | 97944a18c68e27f1472b7c2221ead889b13de107 /t/00smoke.t | |
| download | HTTP-Server-Simple-tarball-master.tar.gz | |
HTTP-Server-Simple-0.50HEADHTTP-Server-Simple-0.50master
Diffstat (limited to 't/00smoke.t')
| -rw-r--r-- | t/00smoke.t | 11 |
1 files changed, 11 insertions, 0 deletions
diff --git a/t/00smoke.t b/t/00smoke.t new file mode 100644 index 0000000..8e6cb95 --- /dev/null +++ b/t/00smoke.t @@ -0,0 +1,11 @@ +use Test::More tests=>8; + +use_ok(HTTP::Server::Simple); +ok(HTTP::Server::Simple->can('new'), 'can new()'); +my $s= HTTP::Server::Simple->new(); +isa_ok($s,'HTTP::Server::Simple'); +is($s->port(),8080,'Defaults to 8080'); +is($s->port(13432),13432,'Can change port'); +is($s->port(),13432,'Change persists'); +ok($s->can('print_banner'), 'can print_banner()'); +ok($s->can('run'), 'can run()'); |