← Back to branch summary

~ubuntu-branches/ubuntu/trusty/bioperl/trusty

« back to all changes in this revision

Viewing changes to Bio/SeqFeature/Similarity.pm

  • Committer: Package Import Robot
  • Author(s): Charles Plessy
  • Date: 2013-09-22 13:39:48 UTC
  • mfrom: (3.1.11 sid)
  • Revision ID: package-import@ubuntu.com-20130922133948-c6z62zegjyp7ztou
Tags: 1.6.922-1
http://bugs.debian.org/722910
* New upstream release.
* Replaces and Breaks grinder (<< 0.5.3-3~) because of overlaping contents.
  Closes: #722910
* Stop Replacing and Breaking bioperl ( << 1.6.9 ): not needed anymore. 

Show diffs side-by-side

added added

removed removed

Lines of Context:
Bio/SeqFeature/Similarity.pm
188
188
=cut
189
189
 
190
190
sub seqdesc {
191
 
    my ($self, $value) = @_;
 
191
    my ( $self, $value ) = @_;
192
192
 
193
 
    if( defined $value ) { 
194
 
        my $v = Bio::Annotation::SimpleValue->new();
195
 
        $v->value($value);
196
 
        $self->annotation->add_Annotation('description',$v);
 
193
    if ( defined $value ) {
 
194
        my $v = Bio::Annotation::SimpleValue->new();
 
195
        $v->value($value);
 
196
        $self->annotation->add_Annotation( 'description', $v );
197
197
    }
198
198
    my ($v) = $self->annotation()->get_Annotations('description');
199
199
    return defined $v ? $v->value : undef;