From b589d3d21e5ec5f0cc7621164bdb4a5b5f6b620f Mon Sep 17 00:00:00 2001
From: Glenn Proctor <gp1@sanger.ac.uk>
Date: Thu, 24 Mar 2005 15:11:49 +0000
Subject: [PATCH] Added test for fetch_all_regulatory_features()
---
modules/t/gene.t | 6 ++++++
1 file changed, 6 insertions(+)
diff --git a/modules/t/gene.t b/modules/t/gene.t
index a3c12eebdc..7b4b752dca 100644
--- a/modules/t/gene.t
+++ b/modules/t/gene.t
@@ -618,3 +618,9 @@ ok($dbe_id && $dbe_id == $dbe->dbID());
$multi->restore();
+
+
+# test regulatory feature retrieval
+my $rf_gene = $ga->fetch_by_dbID(18256);
+#ok(@{$rf_gene->fetch_all_regulatory_features()} == 1); # non-recursive
+ok(@{$rf_gene->fetch_all_regulatory_features(1)} == 2); # recursive
--
GitLab