Permalink
Browse files

Small fix for previous commit

  • Loading branch information...
1 parent c73dae7 commit 33831d2dfece1da78199f0590e2854a61539b579 @fangly fangly committed Feb 18, 2014
Showing with 2 additions and 2 deletions.
  1. +1 −1 Bio/Tools/GuessSeqFormat.pm
  2. +1 −1 t/SeqIO/SeqIO.t
@@ -466,7 +466,7 @@ sub guess
@lines = split /\n/, $self->{-text};
} elsif (defined $self->{-file}) {
# If given a filename, open the file.
- open $fh, $self->{-file} ||
+ open($fh, $self->{-file}) ||
$self->throw("Could not open '$self->{-file}' for reading: $!");
} elsif (defined $self->{-fh}) {
# If given a filehandle, figure out if it's a plain GLOB
View
@@ -154,6 +154,6 @@ throws_ok {
throws_ok {
Bio::SeqIO->new(-file => 'foo.bar');
-} qr/Can not open 'foo.bar' for reading:/,
+} qr/Could not open 'foo.bar' for reading:/,
'Must pass a real file';

0 comments on commit 33831d2

Please sign in to comment.