[Bioperl-l] [bug 3120] Bio::DB::SeqFeature::Store::DBI::SQLite	+	bp_seqfeature_gff3.PLS = unhappy?
    John Anderson 
    genehack at genehack.org
       
    Sun Jul 25 19:48:22 UTC 2010
    
    
  
On Jul 25, 2010, at 3:18 PM, Chris Fields wrote:
> On this one (in Bio::DB::SeqFeature::DBI::mysql):
> 
> if ( $typeid and $db_seqid and $start and $end and $strand ) {
Yeah, sorry, that sort of bugged me too, but once I got into testing stuff I forgot to go back and clean it up... 
> Might even work shortening to a grep:
> 
> if ( grep {!defined($_)} ($typeid, $db_seqid, $start, $end,$strand) ) {...}
Ended up with:
  # if we weren't called with all the params, pull those out of the database too
  if ( not ( grep { defined($_) } ( ... ))) { ... }
because having the negation buried inside the grep block seemed confusing...
I amended topic/bug-3120 and force-pushed it back to my tree; if you prefer the !defined($_) version just let me know -- still trying to get my head around the preferred house coding style. 8^)
j.
    
    
More information about the Bioperl-l
mailing list