Permalink
Browse files

'our' is preferred over 'use vars'

  • Loading branch information...
1 parent c4407ae commit b5522bd96d22b05b93f0c4186728216a027e30d5 @fangly fangly committed Nov 17, 2012
Showing with 3 additions and 3 deletions.
  1. +3 −3 Bio/PrimarySeq.pm
View
@@ -124,11 +124,11 @@ methods. Internal methods are usually preceded with a _
package Bio::PrimarySeq;
-use vars qw($MATCHPATTERN $GAP_SYMBOLS);
+
use strict;
-$MATCHPATTERN = 'A-Za-z\-\.\*\?=~';
-$GAP_SYMBOLS = '-~';
+our $MATCHPATTERN = 'A-Za-z\-\.\*\?=~';
+our $GAP_SYMBOLS = '-~';
use base qw(Bio::Root::Root Bio::PrimarySeqI
Bio::IdentifiableI Bio::DescribableI);

0 comments on commit b5522bd

Please sign in to comment.