fixed sequence type guessing in create_blast_index

git-svn-id: http://biopieces.googlecode.com/svn/trunk@855 74ccb610-7750-0410-82ae-013aeee3265d

diff --git a/bp_bin/create_blast_index b/bp_bin/create_blast_index
index 9c04c04ff7ec416c4f42207dd2e44b023f98bbf6..61f75ffaaad781bea37083b7e220d93b58536b2c 100755 (executable)
--- a/bp_bin/create_blast_index
+++ b/bp_bin/create_blast_index
@@ -69,7 +69,7 @@ close $fh_tmp;
 
 $arg = "-t $options->{ 'index_name' }";
 
-if ( $seq_type eq "protein" ) {
+if ( $seq_type =~ /protein/i ) {
     $arg .= " -p T";
 } else {
     $arg .= " -p F";