diff --git a/modules/t/dnaAlignFeatureAdaptor.t b/modules/t/dnaAlignFeatureAdaptor.t new file mode 100644 index 0000000000000000000000000000000000000000..f4100e0a52f0173520ce4ca2efcc4e3410ba12d1 --- /dev/null +++ b/modules/t/dnaAlignFeatureAdaptor.t @@ -0,0 +1,24 @@ +use lib 't'; + +BEGIN { $| = 1; + use Test; + plan tests => 2; +} + + +use MultiTestDB; +use TestUtils qw(test_getter_setter debug); + +our $verbose = 0; + +my $multi = MultiTestDB->new(); +ok(1); + +my $db = $multi->get_DBAdaptor('core'); +my $dafa = $db->get_DnaAlignFeatureAdaptor(); + +# list_dbIDs +debug("DnaAlignFeatureAdaptor->list_dbIDs"); +my $ids = $dafa->list_dbIDs(); +ok (@{$ids}); + diff --git a/modules/t/proteinAlignFeatureAdaptor.t b/modules/t/proteinAlignFeatureAdaptor.t new file mode 100644 index 0000000000000000000000000000000000000000..aad36fbea40e1a6e79446800b2ed43c7d816096d --- /dev/null +++ b/modules/t/proteinAlignFeatureAdaptor.t @@ -0,0 +1,24 @@ +use lib 't'; + +BEGIN { $| = 1; + use Test; + plan tests => 2; +} + + +use MultiTestDB; +use TestUtils qw(test_getter_setter debug); + +our $verbose = 0; + +my $multi = MultiTestDB->new(); +ok(1); + +my $db = $multi->get_DBAdaptor('core'); +my $pafa = $db->get_ProteinAlignFeatureAdaptor(); + +# list_dbIDs +debug("ProteinAlignFeatureAdaptor->list_dbIDs"); +my $ids = $pafa->list_dbIDs(); +ok (@{$ids}); +