some documentation improvements, some test fixes

[maypole.git] / t / 01.httpd-basic.t

diff --git a/t/01.httpd-basic.t b/t/01.httpd-basic.t
index fe323513ff033eea8a631195d925b55ec81940ee..cbf62d5cc448fcc0b01320340f637b78d421f6ac 100644 (file)
--- a/t/01.httpd-basic.t
+++ b/t/01.httpd-basic.t
@@ -1,5 +1,10 @@
 use Test::More tests=>2;
-
-use_ok("Maypole::HTTPD");
-use_ok("Maypole::HTTPD::Frontend");
+SKIP: {
+  no warnings 'all';
+  my $have_httpd = eval ' use HTTP::Server::Simple::Static; $HTTP::Server::Simple::Static::VERSION; ';
+  warn "have_httpd : $have_httpd\n";
+  skip ('Maypole::HTTPD tests', 2) unless ( $have_httpd );
+  use_ok("Maypole::HTTPD");
+  use_ok("Maypole::HTTPD::Frontend");
+};