rev 1414 - trunk/mariachi/t

[prev] [thread] [next] [lurker] [Date index for 2003/10/15]

From: richardc
Subject: rev 1414 - trunk/mariachi/t
Date: 23:29 on 15 Oct 2003
Author: richardc
Date: 2003-10-15 23:29:54 +0100 (Wed, 15 Oct 2003)
New Revision: 1414

Added:
   trunk/mariachi/t/01compile.t
Log:
pull from siesta a little

Added: trunk/mariachi/t/01compile.t
===================================================================
--- trunk/mariachi/t/01compile.t	2003-10-09 14:36:22 UTC (rev 1413)
+++ trunk/mariachi/t/01compile.t	2003-10-15 22:29:54 UTC (rev 1414)
@@ -0,0 +1,23 @@
+#!perl -w
+# test compile all .pm files - note, may not find broken dependencies,
+# as all things are loaded into the same interpreter
+use lib qw(t/lib);
+
+use strict;
+use File::Find::Rule;
+
+# Hack - Siesta::Web won't compile without Apache (unless
+# Siesta::Web::FakeApache is compiled first - sorting it backwards
+# makes sure that happens
+
+my @files = sort { $b cmp $a } find( name => '*.pm', in => 'blib/lib' );
+
+require Test::More;
+Test::More->import( tests => scalar @files );
+
+for my $class (@files) {
+    $class =~ s{blib/lib/(.*)\.pm}{$1};
+    $class =~ s{/}{::}g;
+    require_ok($class);
+}
+

Generated at 21:01 on 23 Mar 2007 by mariachi 0.52