cleanup of findsim_seq

[biopieces.git] / bp_bin / blast_seq_pair

diff --git a/bp_bin/blast_seq_pair b/bp_bin/blast_seq_pair
index 5c4c678a4bbc7f89eb25aeb82f2d8a1ca2e3dfe4..d0488c2571a492fcf4f6e3729c3a465f069e9fcb 100755 (executable)
--- a/bp_bin/blast_seq_pair
+++ b/bp_bin/blast_seq_pair
@@ -165,18 +165,21 @@ Biopieces.open(options[:stream_in], options[:stream_out]) do |input, output|
     output.puts record
 
     if record.has_key? :SEQ_NAME and record.has_key? :SEQ
+      seq = Seq.new_bp(record)
+
       unless got1
         Fasta.open(infile1, mode="w") do |fasta_io|
-          fasta_io.puts record
+          fasta_io.puts seq.to_fasta
         end
 
         got1  = true
         type1 = Seq.new(nil, record[:SEQ][0 ... 100]).type_guess
+        next
       end
 
       unless got2
         Fasta.open(infile2, mode="w") do |fasta_io|
-          fasta_io.puts record
+          fasta_io.puts seq.to_fasta
         end
 
         got2  = true