From dfc19b17a70c7c1b31392be840ffaed609ae7328 Mon Sep 17 00:00:00 2001
From: Web Admin <w3adm@sanger.ac.uk>
Date: Thu, 20 Mar 2003 12:09:15 +0000
Subject: [PATCH] fixed buglets...
---
modules/Bio/EnsEMBL/Map/DBSQL/QtlFeatureAdaptor.pm | 4 ++--
1 file changed, 2 insertions(+), 2 deletions(-)
diff --git a/modules/Bio/EnsEMBL/Map/DBSQL/QtlFeatureAdaptor.pm b/modules/Bio/EnsEMBL/Map/DBSQL/QtlFeatureAdaptor.pm
index ad0199c577..59486c1a46 100644
--- a/modules/Bio/EnsEMBL/Map/DBSQL/QtlFeatureAdaptor.pm
+++ b/modules/Bio/EnsEMBL/Map/DBSQL/QtlFeatureAdaptor.pm
@@ -115,8 +115,8 @@ sub _objs_from_sth {
my $mad = $self->db()->get_MarkerAdaptor();
- my $flank_marker_1 = $mad->fetch_by_dbID( $flank_marker_id_1 );
- my $flank_marker_2 = $mad->fetch_by_dbID( $flank_marker_id_1 );
+ my $flank_marker_1 = $flank_marker_id_1 ? $mad->fetch_by_dbID( $flank_marker_id_1 ) : undef;
+ my $flank_marker_2 = $flank_marker_id_2 ? $mad->fetch_by_dbID( $flank_marker_id_2 ) : undef;
my $peak_marker = $peak_marker_id ? $mad->fetch_by_dbID( $peak_marker_id ) : undef;
my $analysis = $self->db()->get_AnalysisAdaptor()->fetch_by_dbID( $analysis_id );
--
GitLab