Permalink
Browse files

Bugfix: not an OO module, so no self

  • Loading branch information...
1 parent f7c24e7 commit f0847abbde80a1d6e92b99be65ce0742834c6539 Ray Miller committed Feb 24, 2012
Showing with 2 additions and 2 deletions.
  1. +2 −2 packages/LIMS2-Model/lib/LIMS2/Model/Helpers/SyntheticConstruct.pm
@@ -19,7 +19,7 @@ use IO::String;
use Data::Compare qw( Compare );
sub bio_seq_to_genbank {
- my ( $self, $bio_seq ) = @_;
+ my $bio_seq = shift;
my $genbank;
my $seq_io = Bio::SeqIO->new( -fh => IO::String->new( $genbank ), -format => 'genbank' );
@@ -29,7 +29,7 @@ sub bio_seq_to_genbank {
}
sub genbank_to_bio_seq {
- my ( $self, $genbank ) = @_;
+ my $genbank = shift;
my $seq_io = Bio::SeqIO->new( -fh => IO::String->new( $genbank ), -format => 'genbank' );
return $seq_io->next_seq;

0 comments on commit f0847ab

Please sign in to comment.