[Bio] / FigKernelPackages / PinnedRegions.pm Repository:
ViewVC logotype

Diff of /FigKernelPackages/PinnedRegions.pm

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

revision 1.27, Wed Sep 2 09:38:10 2009 UTC revision 1.28, Wed Sep 16 09:34:32 2009 UTC
# Line 416  Line 416 
416    
417  sub add_features_to_fdata {  sub add_features_to_fdata {
418      my ( $fig, $feature_data, $add_features, $regions ) = @_;      my ( $fig, $feature_data, $add_features, $regions ) = @_;
   
419      foreach my $region ( @$regions ) {      foreach my $region ( @$regions ) {
420          my $new_feats = $add_features->{ $region->{ 'genome_id' } };          my $new_feats = $add_features->{ $region->{ 'genome_id' } };
421          foreach my $nf ( @$new_feats ) {          foreach my $nf ( @$new_feats ) {
# Line 460  Line 459 
459               'offset_beg' => $offset_beg,               'offset_beg' => $offset_beg,
460               'offset_end' => $offset_end,               'offset_end' => $offset_end,
461               'function'   => $func,               'function'   => $func,
462                 'location'   => $contig."_".$beg."_".$end
463      };      };
464  }  }
465    

Legend:
Removed from v.1.27  
changed lines
  Added in v.1.28

MCS Webmaster
ViewVC Help
Powered by ViewVC 1.0.3