acts_as_list sollte nicht kaputtgehen hier
authorSven Schöling <s.schoeling@linet-services.de>
Wed, 13 Mar 2013 18:04:22 +0000 (19:04 +0100)
committerSven Schöling <s.schoeling@linet-services.de>
Wed, 13 Mar 2013 18:04:22 +0000 (19:04 +0100)
t/db_helper/acts_as_list.t

index 2e7b708..3b5b570 100644 (file)
@@ -1,4 +1,4 @@
-use Test::More tests => 51;
+use Test::More;
 use Test::Exception;
 
 use strict;
@@ -9,9 +9,18 @@ use utf8;
 use Data::Dumper;
 use Support::TestSetup;
 
-use_ok 'SL::DB::RequirementSpec';
-use_ok 'SL::DB::RequirementSpecItem';
-use_ok 'SL::DB::RequirementSpecTextBlock';
+eval {
+  require 'SL::DB::RequirementSpec';
+  require 'SL::DB::RequirementSpecItem';
+  require 'SL::DB::RequirementSpecTextBlock';
+  1;
+} or my $skip = 'RequirementSpec is not available for this test';
+
+if ($skip) {
+  plan skip_all => $skip;
+} else {
+  plan tests => 48;
+}
 
 sub reset_state {
   "SL::DB::Manager::${_}"->delete_all(all => 1) for qw(RequirementSpecTextBlock RequirementSpecItem RequirementSpec);