[Bio] / Sprout / Sprout.pm Repository:
ViewVC logotype

Diff of /Sprout/Sprout.pm

Parent Directory Parent Directory | Revision Log Revision Log | View Patch Patch

revision 1.111, Wed May 7 23:11:51 2008 UTC revision 1.112, Wed May 28 17:39:38 2008 UTC
# Line 552  Line 552 
552      if (ref $selections ne 'ARRAY') {      if (ref $selections ne 'ARRAY') {
553          $selections = [ split /\s*,\s*/, $selections ];          $selections = [ split /\s*,\s*/, $selections ];
554      }      }
555      my %selected = map { $_ => } @{$selections};      my %selected = map { $_ => 1 } @{$selections};
556      # Extract the filter information. The default is no filtering. It can be passed as a tab-delimited      # Extract the filter information. The default is no filtering. It can be passed as a tab-delimited
557      # string or a list reference.      # string or a list reference.
558      my $filterParms = $options{filter} || "";      my $filterParms = $options{filter} || "";

Legend:
Removed from v.1.111  
changed lines
  Added in v.1.112

MCS Webmaster
ViewVC Help
Powered by ViewVC 1.0.3