Skip to content

Commit

Permalink
untabify
Browse files Browse the repository at this point in the history
  • Loading branch information
Chris Fields committed Aug 22, 2011
1 parent 0ec1657 commit 53de35e
Show file tree
Hide file tree
Showing 16 changed files with 54 additions and 54 deletions.
2 changes: 1 addition & 1 deletion lib/Bio/Tools/EUtilities.pm
View file
Expand Up @@ -208,7 +208,7 @@ sub new {
return $self;
} else {
my %param = @args;
@param{ map { lc $_ } keys %param } = values %param; # lowercase keys
@param{ map { lc $_ } keys %param } = values %param; # lowercase keys
my $eutil = $param{'-eutil'} || $class->throw("Need eutil to make instance");
return unless( $class->_load_eutil_module( $DATA_MODULE{$eutil}) );
return "Bio::Tools::EUtilities::$DATA_MODULE{$eutil}"->new(-datatype => lc $DATA_MODULE{$eutil},
Expand Down
10 changes: 5 additions & 5 deletions t/RemoteDB/EUtilities.t
View file
Expand Up @@ -37,12 +37,12 @@ BEGIN {
$DEBUG = $ENV{'BIOPERLDEBUG'} || 0;
# this seems to work for perl 5.6 and perl 5.8

use Bio::Root::Test;
use Bio::Root::Test;

test_begin(-tests => $NUMTESTS,
-requires_modules => [qw(XML::Simple LWP::UserAgent)],
-requires_email => 1,
);
test_begin(-tests => $NUMTESTS,
-requires_modules => [qw(XML::Simple LWP::UserAgent)],
-requires_email => 1,
);

use_ok('Bio::DB::EUtilities');
use_ok('LWP::UserAgent');
Expand Down
6 changes: 3 additions & 3 deletions t/Tools/EUtilities/EUtilParameters.t
View file
Expand Up @@ -7,10 +7,10 @@ use warnings;

BEGIN {
use lib '.';
use Bio::Root::Test;
use Bio::Root::Test;

test_begin(-tests => 13,
-requires_modules =>
test_begin(-tests => 13,
-requires_modules =>
[qw(URI HTTP::Request)]);

use_ok('Bio::Tools::EUtilities::EUtilParameters');
Expand Down
6 changes: 3 additions & 3 deletions t/Tools/EUtilities/egquery.t
View file
Expand Up @@ -7,10 +7,10 @@ use warnings;

BEGIN {
use lib '.';
use Bio::Root::Test;
use Bio::Root::Test;

test_begin(-tests => 19,
-requires_module => 'XML::Simple');
test_begin(-tests => 19,
-requires_module => 'XML::Simple');

use_ok('Bio::Tools::EUtilities');
}
Expand Down
6 changes: 3 additions & 3 deletions t/Tools/EUtilities/einfo.t
View file
Expand Up @@ -7,10 +7,10 @@ use warnings;

BEGIN {
use lib '.';
use Bio::Root::Test;
use Bio::Root::Test;

test_begin(-tests => 51,
-requires_module => 'XML::Simple');
test_begin(-tests => 51,
-requires_module => 'XML::Simple');

use_ok('Bio::Tools::EUtilities');
use_ok('Bio::Tools::EUtilities::EUtilParameters');
Expand Down
6 changes: 3 additions & 3 deletions t/Tools/EUtilities/elink_acheck.t
View file
Expand Up @@ -6,10 +6,10 @@ use warnings;

BEGIN {
use lib '.';
use Bio::Root::Test;
use Bio::Root::Test;

test_begin(-tests => 130,
-requires_module => 'XML::Simple');
test_begin(-tests => 130,
-requires_module => 'XML::Simple');

use_ok('Bio::Tools::EUtilities');
use_ok('Bio::Tools::EUtilities::EUtilParameters');
Expand Down
6 changes: 3 additions & 3 deletions t/Tools/EUtilities/elink_lcheck.t
View file
Expand Up @@ -6,10 +6,10 @@ use warnings;

BEGIN {
use lib '.';
use Bio::Root::Test;
use Bio::Root::Test;

test_begin(-tests => 64,
-requires_module => 'XML::Simple');
test_begin(-tests => 64,
-requires_module => 'XML::Simple');

use_ok('Bio::Tools::EUtilities');
use_ok('Bio::Tools::EUtilities::EUtilParameters');
Expand Down
6 changes: 3 additions & 3 deletions t/Tools/EUtilities/elink_llinks.t
View file
Expand Up @@ -6,10 +6,10 @@ use warnings;

BEGIN {
use lib '.';
use Bio::Root::Test;
use Bio::Root::Test;

test_begin(-tests => 86,
-requires_module => 'XML::Simple');
test_begin(-tests => 86,
-requires_module => 'XML::Simple');

use_ok('Bio::Tools::EUtilities');
use_ok('Bio::Tools::EUtilities::EUtilParameters');
Expand Down
6 changes: 3 additions & 3 deletions t/Tools/EUtilities/elink_ncheck.t
View file
Expand Up @@ -7,10 +7,10 @@ use Data::Dumper;

BEGIN {
use lib '.';
use Bio::Root::Test;
use Bio::Root::Test;

test_begin(-tests => 60,
-requires_module => 'XML::Simple');
test_begin(-tests => 60,
-requires_module => 'XML::Simple');

use_ok('Bio::Tools::EUtilities');
use_ok('Bio::Tools::EUtilities::EUtilParameters');
Expand Down
6 changes: 3 additions & 3 deletions t/Tools/EUtilities/elink_neighbor.t
View file
Expand Up @@ -6,10 +6,10 @@ use warnings;

BEGIN {
use lib '.';
use Bio::Root::Test;
use Bio::Root::Test;

test_begin(-tests => 63,
-requires_module => 'XML::Simple');
test_begin(-tests => 63,
-requires_module => 'XML::Simple');

use_ok('Bio::Tools::EUtilities');
use_ok('Bio::Tools::EUtilities::EUtilParameters');
Expand Down
6 changes: 3 additions & 3 deletions t/Tools/EUtilities/elink_neighbor_history.t
View file
Expand Up @@ -6,10 +6,10 @@ use warnings;

BEGIN {
use lib '.';
use Bio::Root::Test;
use Bio::Root::Test;

test_begin(-tests => 65,
-requires_module => 'XML::Simple');
test_begin(-tests => 65,
-requires_module => 'XML::Simple');

use_ok('Bio::Tools::EUtilities');
use_ok('Bio::Tools::EUtilities::EUtilParameters');
Expand Down
6 changes: 3 additions & 3 deletions t/Tools/EUtilities/elink_scores.t
View file
Expand Up @@ -6,10 +6,10 @@ use warnings;

BEGIN {
use lib '.';
use Bio::Root::Test;
use Bio::Root::Test;

test_begin(-tests => 58,
-requires_module => 'XML::Simple');
test_begin(-tests => 58,
-requires_module => 'XML::Simple');

use_ok('Bio::Tools::EUtilities');
use_ok('Bio::Tools::EUtilities::EUtilParameters');
Expand Down
10 changes: 5 additions & 5 deletions t/Tools/EUtilities/epost.t
View file
Expand Up @@ -6,10 +6,10 @@ use warnings;

BEGIN {
use lib '.';
use Bio::Root::Test;
use Bio::Root::Test;

test_begin(-tests => 17,
-requires_module => 'XML::Simple');
test_begin(-tests => 17,
-requires_module => 'XML::Simple');

use_ok('Bio::Tools::EUtilities');
use_ok('Bio::Tools::EUtilities::EUtilParameters');
Expand Down Expand Up @@ -45,8 +45,8 @@ my @ids = qw(1621261 89318838 68536103 20807972 730439);

# add Parameters
my $pb = Bio::Tools::EUtilities::EUtilParameters->new(-eutil => 'epost',
-db => 'protein',
-id => \@ids);
-db => 'protein',
-id => \@ids);

$eutil->parameter_base($pb);

Expand Down
10 changes: 5 additions & 5 deletions t/Tools/EUtilities/esearch.t
View file
Expand Up @@ -7,10 +7,10 @@ use warnings;

BEGIN {
use lib '.';
use Bio::Root::Test;
use Bio::Root::Test;

test_begin(-tests => 33,
-requires_module => 'XML::Simple');
test_begin(-tests => 33,
-requires_module => 'XML::Simple');

use_ok('Bio::Tools::EUtilities');
use_ok('Bio::Tools::EUtilities::EUtilParameters');
Expand Down Expand Up @@ -45,8 +45,8 @@ is($eutil->get_term, undef,'get_term');

# add Parameters
my $pb = Bio::Tools::EUtilities::EUtilParameters->new(-eutil => 'esearch',
-db => 'protein',
-term => 'Notch AND Mus musculus');
-db => 'protein',
-term => 'Notch AND Mus musculus');

$eutil->parameter_base($pb);

Expand Down
10 changes: 5 additions & 5 deletions t/Tools/EUtilities/espell.t
View file
Expand Up @@ -7,10 +7,10 @@ use warnings;

BEGIN {
use lib '.';
use Bio::Root::Test;
use Bio::Root::Test;

test_begin(-tests => 22,
-requires_module => 'XML::Simple');
test_begin(-tests => 22,
-requires_module => 'XML::Simple');

use_ok('Bio::Tools::EUtilities');
use_ok('Bio::Tools::EUtilities::EUtilParameters');
Expand Down Expand Up @@ -43,8 +43,8 @@ is($eutil->get_translation_to, undef,'get_translation_to');

# add Parameters
my $pb = Bio::Tools::EUtilities::EUtilParameters->new(-eutil => 'espell',
-db => 'protein',
-term => 'Notch AND Mus musculus');
-db => 'protein',
-term => 'Notch AND Mus musculus');

is($eutil->get_db, 'pubmed', 'get_db');
is(($eutil->get_dbs)[0], 'pubmed', 'get_dbs');
Expand Down
6 changes: 3 additions & 3 deletions t/Tools/EUtilities/esummary.t
View file
Expand Up @@ -6,10 +6,10 @@ use warnings;
use Data::Dumper;
BEGIN {
use lib '.';
use Bio::Root::Test;
use Bio::Root::Test;

test_begin(-tests => 83,
-requires_module => 'XML::Simple');
test_begin(-tests => 83,
-requires_module => 'XML::Simple');

use_ok('Bio::Tools::EUtilities');
use_ok('Bio::Tools::EUtilities::EUtilParameters');
Expand Down

0 comments on commit 53de35e

Please sign in to comment.