Commit 69e029da authored by James Stalker's avatar James Stalker
Browse files

*** empty log message ***

parent 43d4d37d
...@@ -175,7 +175,6 @@ sub generic_fetch { ...@@ -175,7 +175,6 @@ sub generic_fetch {
#append additional clauses which may have been defined #append additional clauses which may have been defined
$sql .= "\n$final_clause"; $sql .= "\n$final_clause";
##print STDERR "\n\n$sql\n\n";
my $sth = $db->prepare($sql); my $sth = $db->prepare($sql);
...@@ -345,7 +344,6 @@ sub fetch_all_by_Slice_and_score { ...@@ -345,7 +344,6 @@ sub fetch_all_by_Slice_and_score {
my $syn = $tabs[0]->[1]; my $syn = $tabs[0]->[1];
$constraint = "${syn}.score > $score"; $constraint = "${syn}.score > $score";
} }
return $self->fetch_all_by_Slice_constraint($slice, $constraint, return $self->fetch_all_by_Slice_constraint($slice, $constraint,
$logic_name); $logic_name);
} }
......
...@@ -151,7 +151,7 @@ sub _objs_from_sth { ...@@ -151,7 +151,7 @@ sub _objs_from_sth {
sub fetch_all_by_chr_name { sub fetch_all_by_chr_name {
my ($self,$chr_name) = @_; my ($self,$chr_name) = @_;
throw('Chromosome name argument expected') if(!$chr_name); throw('Chromosome name argument expected') if(!$chr_name);
my $slice = my $slice =
......
...@@ -704,7 +704,6 @@ sub fetch_by_chr_band { ...@@ -704,7 +704,6 @@ sub fetch_by_chr_band {
my ($self,$chr,$band) = @_; my ($self,$chr,$band) = @_;
my $chr_slice = $self->fetch_by_region('toplevel', $chr); my $chr_slice = $self->fetch_by_region('toplevel', $chr);
my $seq_region_id = $self->get_seq_region_id($chr_slice); my $seq_region_id = $self->get_seq_region_id($chr_slice);
my $sth = $self->db->prepare my $sth = $self->db->prepare
......
Markdown is supported
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment