From c0513e9478ca020be8c859520d6dd11e0110b496 Mon Sep 17 00:00:00 2001
From: Nathan Johnson <njohnson@ebi.ac.uk>
Date: Mon, 6 Jun 2011 10:34:28 +0000
Subject: [PATCH] removed some comments
---
modules/t/iterator.t | 7 +------
1 file changed, 1 insertion(+), 6 deletions(-)
diff --git a/modules/t/iterator.t b/modules/t/iterator.t
index 6a5e426bdd..4d77516d25 100644
--- a/modules/t/iterator.t
+++ b/modules/t/iterator.t
@@ -144,17 +144,12 @@ my $sa = $db->get_SliceAdaptor;
my $ga = $db->get_GeneAdaptor;
-#Need to find Slice which genes are on
-#Do this via direct mysql or hardcode?
-#sql is unlikely to change
+#Do this via direct SQL as unlikely to change
my $sql = 'SELECT sr.name, g.seq_region_start from gene g, seq_region sr where g.seq_region_id = sr.seq_region_id order by g.seq_region_start limit 1';
my ($sr_name, $sr_start) = @{$db->dbc->db_handle->selectrow_arrayref($sql)};
my $slice = $sa->fetch_by_region('chromosome', $sr_name, 1, ($sr_start + 1000000));
my @genes = @{$ga->fetch_all_by_Slice($slice)};
-
-#Are there any genes in this test DB?
-
my $num_genes = scalar(@genes);
ok($num_genes, "Found $num_genes Gene(s) on test Slice");
--
GitLab