From: martinahansen <martinahansen@74ccb610-7750-0410-82ae-013aeee3265d>
Date: Tue, 12 Oct 2010 15:06:35 +0000 (+0000)
Subject: slight bug fix of write_fastq
X-Git-Url: https://git.donarmstrong.com/?a=commitdiff_plain;h=862e5199fc285d72f68c494ed59ca12bfadf039a;p=biopieces.git

slight bug fix of write_fastq

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

diff --git a/bp_bin/write_fastq b/bp_bin/write_fastq
index d242f37..5f81de2 100755
--- a/bp_bin/write_fastq
+++ b/bp_bin/write_fastq
@@ -53,7 +53,7 @@ $data_out = Maasha::Biopieces::write_stream( $options->{ "data_out" }, $options-
 while ( $record = Maasha::Biopieces::get_record( $in ) ) 
 {
     if ( $entry = Maasha::Fastq::biopiece2fastq( $record ) ) {
-        Maasha::Fastq::put_entry( $entry, $data_out, $options->{ "wrap" } );
+        Maasha::Fastq::put_entry( $entry, $data_out );
     }
 
     Maasha::Biopieces::put_record( $record, $out ) if not $options->{ "no_stream" };