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

Diff of /Sprout/FeatureSaplingLoader.pm

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

revision 1.17, Mon Jun 27 20:20:12 2011 UTC revision 1.18, Wed Aug 24 17:58:54 2011 UTC
# Line 268  Line 268 
268          # feature definition.          # feature definition.
269          my $md5Alias;          my $md5Alias;
270          eval {          eval {
271              $md5Alias = $genomeMD5Data->ComputeGeneMD5(map { $_->String() } @locs);              $md5Alias = $genomeMD5Data->ComputeFeatureMD5($type, map { $_->String() } @locs);
272          };          };
273          if ($@) {          if ($@) {
274              Trace("Error in $fid MD5 computation: $@") if T(0);              Trace("Error in $fid MD5 computation: $@") if T(0);
# Line 388  Line 388 
388          }          }
389          # Make the MD5 identifier an alias.          # Make the MD5 identifier an alias.
390          if (defined $md5Alias) {          if (defined $md5Alias) {
391              $self->PutE(Identifier => "md5g|$md5Alias", natural_form => $md5Alias,              $self->PutE(Identifier => "ubi|$md5Alias", natural_form => $md5Alias,
392                          source => 'MD5');                          source => 'UBI');
393              $self->PutR(IsIdentifiedBy => $fid, "md5g|$md5Alias", conf => 'A');              $self->PutR(IsIdentifiedBy => $fid, "ubi|$md5Alias", conf => 'A');
394          }          }
395          # Finally, this feature is an alias of itself.          # Finally, this feature is an alias of itself.
396          $self->PutE(Identifier => $fid, natural_form => $fid,          $self->PutE(Identifier => $fid, natural_form => $fid,

Legend:
Removed from v.1.17  
changed lines
  Added in v.1.18

MCS Webmaster
ViewVC Help
Powered by ViewVC 1.0.3