From 12403199609edee65d2bbf15dae1da9bb714a9cb Mon Sep 17 00:00:00 2001
From: sboyette <sboyette@9efc2488-bf62-4759-914b-345cdb29e865>
Date: Tue, 19 Aug 2008 18:07:33 +0000
Subject: [PATCH] can has use tests for all modules

git-svn-id: svn://svn.open-ils.org/OpenSRF/trunk@1422 9efc2488-bf62-4759-914b-345cdb29e865
---
 src/perl/t/01-Application.t  | 11 +++++++++++
 src/perl/t/02-AppSession.t   |  7 +++++++
 src/perl/t/03-DomainObject.t |  7 +++++++
 src/perl/t/04-EX.t           |  7 +++++++
 src/perl/t/05-MultiSession.t |  7 +++++++
 src/perl/t/06-System.t       |  7 +++++++
 src/perl/t/07-Transport.t    | 17 +++++++++++++++++
 src/perl/t/08-UnixServer.t   |  7 +++++++
 src/perl/t/09-Utils.t        | 15 +++++++++++++++
 9 files changed, 85 insertions(+)
 create mode 100644 src/perl/t/01-Application.t
 create mode 100644 src/perl/t/02-AppSession.t
 create mode 100644 src/perl/t/03-DomainObject.t
 create mode 100644 src/perl/t/04-EX.t
 create mode 100644 src/perl/t/05-MultiSession.t
 create mode 100644 src/perl/t/06-System.t
 create mode 100644 src/perl/t/07-Transport.t
 create mode 100644 src/perl/t/08-UnixServer.t
 create mode 100644 src/perl/t/09-Utils.t

diff --git a/src/perl/t/01-Application.t b/src/perl/t/01-Application.t
new file mode 100644
index 0000000..009dd60
--- /dev/null
+++ b/src/perl/t/01-Application.t
@@ -0,0 +1,11 @@
+#!perl -T
+
+use Test::More tests => 4;
+
+BEGIN {
+	use_ok( 'OpenSRF::Application' );
+}
+
+use_ok( 'OpenSRF::Application::Client' );
+use_ok( 'OpenSRF::Application::Persist' );
+use_ok( 'OpenSRF::Application::Settings' );
diff --git a/src/perl/t/02-AppSession.t b/src/perl/t/02-AppSession.t
new file mode 100644
index 0000000..1ac6673
--- /dev/null
+++ b/src/perl/t/02-AppSession.t
@@ -0,0 +1,7 @@
+#!perl -T
+
+use Test::More tests => 1;
+
+BEGIN {
+	use_ok( 'OpenSRF::AppSession' );
+}
diff --git a/src/perl/t/03-DomainObject.t b/src/perl/t/03-DomainObject.t
new file mode 100644
index 0000000..2bd18b8
--- /dev/null
+++ b/src/perl/t/03-DomainObject.t
@@ -0,0 +1,7 @@
+#!perl -T
+
+use Test::More tests => 3;
+
+use_ok( 'OpenSRF::DomainObject::oilsMessage' );
+use_ok( 'OpenSRF::DomainObject::oilsMethod' );
+use_ok( 'OpenSRF::DomainObject::oilsResponse' );
diff --git a/src/perl/t/04-EX.t b/src/perl/t/04-EX.t
new file mode 100644
index 0000000..a9378d5
--- /dev/null
+++ b/src/perl/t/04-EX.t
@@ -0,0 +1,7 @@
+#!perl -T
+
+use Test::More tests => 1;
+
+BEGIN {
+	use_ok( 'OpenSRF::EX' );
+}
diff --git a/src/perl/t/05-MultiSession.t b/src/perl/t/05-MultiSession.t
new file mode 100644
index 0000000..b20e8d6
--- /dev/null
+++ b/src/perl/t/05-MultiSession.t
@@ -0,0 +1,7 @@
+#!perl -T
+
+use Test::More tests => 1;
+
+BEGIN {
+	use_ok( 'OpenSRF::MultiSession' );
+}
diff --git a/src/perl/t/06-System.t b/src/perl/t/06-System.t
new file mode 100644
index 0000000..9372ff3
--- /dev/null
+++ b/src/perl/t/06-System.t
@@ -0,0 +1,7 @@
+#!perl -T
+
+use Test::More tests => 1;
+
+BEGIN {
+	use_ok( 'OpenSRF::System' );
+}
diff --git a/src/perl/t/07-Transport.t b/src/perl/t/07-Transport.t
new file mode 100644
index 0000000..64d4069
--- /dev/null
+++ b/src/perl/t/07-Transport.t
@@ -0,0 +1,17 @@
+#!perl -T
+
+use Test::More tests => 10;
+
+BEGIN {
+	use_ok( 'OpenSRF::Transport' );
+}
+
+use_ok( 'OpenSRF::Transport::Listener' );
+use_ok( 'OpenSRF::Transport::PeerHandle' );
+use_ok( 'OpenSRF::Transport::SlimJabber' );
+use_ok( 'OpenSRF::Transport::SlimJabber::Client' );
+use_ok( 'OpenSRF::Transport::SlimJabber::Inbound' );
+use_ok( 'OpenSRF::Transport::SlimJabber::MessageWrapper' );
+use_ok( 'OpenSRF::Transport::SlimJabber::PeerConnection' );
+use_ok( 'OpenSRF::Transport::SlimJabber::XMPPMessage' );
+use_ok( 'OpenSRF::Transport::SlimJabber::XMPPReader' );
diff --git a/src/perl/t/08-UnixServer.t b/src/perl/t/08-UnixServer.t
new file mode 100644
index 0000000..9f8996c
--- /dev/null
+++ b/src/perl/t/08-UnixServer.t
@@ -0,0 +1,7 @@
+#!perl -T
+
+use Test::More tests => 1;
+
+BEGIN {
+	use_ok( 'OpenSRF::UnixServer' );
+}
diff --git a/src/perl/t/09-Utils.t b/src/perl/t/09-Utils.t
new file mode 100644
index 0000000..ddbf43a
--- /dev/null
+++ b/src/perl/t/09-Utils.t
@@ -0,0 +1,15 @@
+#!perl -T
+
+use Test::More tests => 8;
+
+BEGIN {
+	use_ok( 'OpenSRF::Utils' );
+}
+
+use_ok( 'OpenSRF::Utils::Cache' );
+use_ok( 'OpenSRF::Utils::Config' );
+use_ok( 'OpenSRF::Utils::JSON' );
+use_ok( 'OpenSRF::Utils::Logger' );
+use_ok( 'OpenSRF::Utils::LogServer' );
+use_ok( 'OpenSRF::Utils::SettingsClient' );
+use_ok( 'OpenSRF::Utils::SettingsParser' );
-- 
2.43.2