Bug 16582 t/Price.t test should pass if Test::DBIx::Class is not available
authorMark Tompsett <mtompset@hotmail.com>
Wed, 25 May 2016 02:31:15 +0000 (22:31 -0400)
committerBrendan Gallagher <brendan@bywatersolutions.com>
Fri, 3 Jun 2016 07:29:54 +0000 (07:29 +0000)
TEST PLAN
---------
1) prove t/Prices.t
   -- failure
2) apply patch
3) prove t/Prices.t
   -- nicely skipped when Test::DBIx::Class is not available.

Signed-off-by: Srdjan <srdjan@catalyst.net.nz>
Signed-off-by: Marcel de Rooy <m.de.rooy@rijksmuseum.nl>
Signed-off-by: Brendan Gallagher <brendan@bywatersolutions.com>
t/Prices.t

index d6bfda2..74d2eac 100644 (file)
@@ -1,15 +1,23 @@
 use Modern::Perl;
-use Test::More tests => 17;
+use Test::More;
 use Test::MockModule;
 
 use t::lib::Mocks;
 
+use Module::Load::Conditional qw/check_install/;
+
 BEGIN {
-    use_ok('C4::Acquisition');
-    use_ok('C4::Bookseller');
-    use_ok('C4::Context');
-    use_ok('Koha::Number::Price');
-};
+    if ( check_install( module => 'Test::DBIx::Class' ) ) {
+        plan tests => 17;
+    } else {
+        plan skip_all => "Need Test::DBIx::Class"
+    }
+}
+
+use_ok('C4::Acquisition');
+use_ok('C4::Bookseller');
+use_ok('C4::Context');
+use_ok('Koha::Number::Price');
 
 t::lib::Mocks::mock_preference( 'gist', '0.02|0.05|0.196' );