import of rt 3.0.4

[freeside.git] / rt / lib / t / 00smoke.t

diff --git a/rt/lib/t/00smoke.t b/rt/lib/t/00smoke.t
new file mode 100644 (file)
index 0000000..4f36bb3
--- /dev/null
+++ b/rt/lib/t/00smoke.t
@@ -0,0 +1,14 @@
+#!/usr/bin/perl
+
+use Test::More qw(no_plan);
+
+use lib "/opt/rt3/lib";
+use RT;
+ok(RT::LoadConfig);
+ok(RT::Init, "Basic initialization and DB connectivity");
+
+use File::Find;
+File::Find::find({wanted => \&wanted}, '.');
+sub wanted { /^*\.pm\z/s && ok(require $_, "Requiring '$_'"); }
+
+