From 1861c5c408cfefe334e8d66fffa78dddc1c1db58 Mon Sep 17 00:00:00 2001
From: Leo Gordon <lg4@ebi.ac.uk>
Date: Thu, 6 Feb 2014 12:31:34 +0000
Subject: [PATCH] removed rearrange() from DBConnection
---
modules/Bio/EnsEMBL/Hive/DBSQL/DBConnection.pm | 6 ++----
1 file changed, 2 insertions(+), 4 deletions(-)
diff --git a/modules/Bio/EnsEMBL/Hive/DBSQL/DBConnection.pm b/modules/Bio/EnsEMBL/Hive/DBSQL/DBConnection.pm
index 6bf1d024b..2ed3fdd67 100644
--- a/modules/Bio/EnsEMBL/Hive/DBSQL/DBConnection.pm
+++ b/modules/Bio/EnsEMBL/Hive/DBSQL/DBConnection.pm
@@ -37,7 +37,6 @@ package Bio::EnsEMBL::Hive::DBSQL::DBConnection;
use strict;
use warnings;
-use Bio::EnsEMBL::Utils::Argument ('rearrange');
use Bio::EnsEMBL::Hive::Utils::URL;
use base ('Bio::EnsEMBL::DBSQL::DBConnection');
@@ -45,10 +44,9 @@ use base ('Bio::EnsEMBL::DBSQL::DBConnection');
sub new {
my $class = shift;
+ my %flags = @_;
- my ($url) = rearrange( ['URL'], @_ );
-
- if($url) {
+ if(my $url = $flags{'-url'}) {
if(my $parsed_url = Bio::EnsEMBL::Hive::Utils::URL::parse( $url )) {
return $class->SUPER::new(
--
GitLab