comparison lib/hmdb.pm @ 6:7ed37640fe2a draft

planemo upload commit 4c72059b94b27eda2c0ee89bfc5f9bf4e3425dc5
author fgiacomoni
date Fri, 19 Jan 2018 10:18:53 -0500
parents 6091a80df951
children 97788e4bf3fc
comparison
equal deleted inserted replaced
5:520778e357cc 6:7ed37640fe2a
118 118
119 if ( defined $masses ) { 119 if ( defined $masses ) {
120 my @masses = @{$masses} ; 120 my @masses = @{$masses} ;
121 my $nb_masses = scalar ( @masses ) ; 121 my $nb_masses = scalar ( @masses ) ;
122 if ( $nb_masses == 0 ) { croak "The input method parameter mass list is empty" ; } 122 if ( $nb_masses == 0 ) { croak "The input method parameter mass list is empty" ; }
123 elsif ( $nb_masses >= 150 ) { croak "Your mass list is too long : HMDB allows maximum 150 query masses per request \n" ; } ## Del it --- temporary patch 123 elsif ( $nb_masses >= 700 ) { croak "Your mass list is too long : HMDB allows maximum 700 query masses per request \n" ; } ## Del it --- temporary patch
124 124
125 foreach my $mass (@masses) { 125 foreach my $mass (@masses) {
126 126
127 if ($i < $nb_masses) { 127 if ($i < $nb_masses) {
128 $hmdb_masses .= $mass.$sep ; 128 $hmdb_masses .= $mass.$sep ;