From 0c5ef477f5a42b657376d9c2926d2efe04218b81 Mon Sep 17 00:00:00 2001 From: martinahansen Date: Thu, 11 Feb 2010 16:51:56 +0000 Subject: [PATCH] fixed issue in KISS.pm but more found git-svn-id: http://biopieces.googlecode.com/svn/trunk@876 74ccb610-7750-0410-82ae-013aeee3265d --- code_perl/Maasha/KISS.pm | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/code_perl/Maasha/KISS.pm b/code_perl/Maasha/KISS.pm index e4ac684..5b5bca7 100644 --- a/code_perl/Maasha/KISS.pm +++ b/code_perl/Maasha/KISS.pm @@ -681,7 +681,7 @@ sub biopiece2kiss $entry->[ HITS ] = $record->{ 'HITS' } || "."; $entry->[ ALIGN ] = $record->{ 'ALIGN' } || $record->{ 'DESCRIPTOR' } || "."; $entry->[ BLOCK_COUNT ] = $record->{ 'BLOCK_COUNT' } || "."; - $entry->[ BLOCK_BEGS ] = $record->{ 'BLOCK_BEGS' } || "."; + $entry->[ BLOCK_BEGS ] = $record->{ 'BLOCK_BEGS' } || $record->{ 'Q_BEGS' } || "."; $entry->[ BLOCK_LENS ] = $record->{ 'BLOCK_LENS' } || "."; $entry->[ BLOCK_TYPE ] = $record->{ 'BLOCK_TYPE' } || "."; -- 2.39.5