adding bzip2 support in ruby

[biopieces.git] / code_perl / Maasha / Seq.pm

diff --git a/code_perl/Maasha/Seq.pm b/code_perl/Maasha/Seq.pm
index bc07bcecb5512c5a511d222f29d8e4116c66a868..4d6c7997665eb2ff19d4e2e44b6c035de841dbd4 100644 (file)
--- a/code_perl/Maasha/Seq.pm
+++ b/code_perl/Maasha/Seq.pm
@@ -931,8 +931,8 @@ sub seq_alph
         PROTEIN  => [ qw(F L S Y C W P H Q R I M T N K V A D E G) ],
     );
 
-    if ( exists $alph_hash{ $type } ) {
-        $alph = $alph_hash{ $type };
+    if ( exists $alph_hash{ uc $type } ) {
+        $alph = $alph_hash{ uc $type };
     } else {
         die qq(ERROR: Unknown alphabet type: "$type"\n);
     }