]> git.decadent.org.uk Git - maypole.git/commitdiff
new compilation test
authorAaron Trevena <aaron.trevena@gmail.com>
Mon, 9 Oct 2006 11:51:59 +0000 (11:51 +0000)
committerAaron Trevena <aaron.trevena@gmail.com>
Mon, 9 Oct 2006 11:51:59 +0000 (11:51 +0000)
git-svn-id: http://svn.maypole.perl.org/Maypole/trunk@528 48953598-375a-da11-a14b-00016c27c3ee

MANIFEST
t/00compile.t [new file with mode: 0644]

index 33e855306bfeeceda1e2ff095edaab33e5f33b5d..5e8edcc8ccc69d18849339b54e70fcfa341bbda7 100644 (file)
--- a/MANIFEST
+++ b/MANIFEST
@@ -55,6 +55,7 @@ MANIFEST.SKIP
 META.yml
 README
 AUTHORS
+t/00compile.t
 t/01basics.t
 t/01.httpd-basic.t
 t/02pod.t
diff --git a/t/00compile.t b/t/00compile.t
new file mode 100644 (file)
index 0000000..aab6480
--- /dev/null
@@ -0,0 +1,25 @@
+#!/usr/bin/perl -w
+
+use strict;
+use Test::More tests => 13;
+
+use_ok('Maypole::Application');
+use_ok('Maypole::Constants');
+use_ok('Maypole::Config');
+use_ok('Maypole::Headers');
+use_ok('Maypole::Session');
+use_ok('Maypole');
+use_ok('Maypole::Model::Base');
+use_ok('Maypole::Model::CDBI::Base');
+use_ok('Maypole::Model::CDBI');
+use_ok('Maypole::Model::CDBI::Plain');
+use_ok('Maypole::Model::CDBI::FromCGI');
+use_ok('Maypole::Model::CDBI::AsForm');
+
+SKIP: {
+       eval { use Data::FormValidator };
+        skip 'Data::FormValidator is not installed or does not work', 1 if ($@);
+       use_ok('Maypole::Model::CDBI::DFV');
+}
+
+