Mailing-List: contact commits-help@couchdb.apache.org; run by ezmlm
Precedence: bulk
Reply-To: dev@couchdb.apache.org
Content-Type: text/plain; charset="utf-8"
MIME-Version: 1.0
Content-Transfer-Encoding: 7bit
Subject: svn commit: r778521 - /couchdb/trunk/src/couchdb/couch_stream.erl
Date: Mon, 25 May 2009 21:59:17 -0000
To: commits@couchdb.apache.org
From: damien@apache.org
Message-Id: <20090525215917.CA6F123888D2@eris.apache.org>

Author: damien
Date: Mon May 25 21:59:17 2009
New Revision: 778521

URL: http://svn.apache.org/viewvc?rev=778521&view=rev
Log:
Fix for binary chunks being out of order with new tail append code

Modified:
    couchdb/trunk/src/couchdb/couch_stream.erl

Modified: couchdb/trunk/src/couchdb/couch_stream.erl
URL: http://svn.apache.org/viewvc/couchdb/trunk/src/couchdb/couch_stream.erl?rev=778521&r1=778520&r2=778521&view=diff
==============================================================================
--- couchdb/trunk/src/couchdb/couch_stream.erl (original)
+++ couchdb/trunk/src/couchdb/couch_stream.erl Mon May 25 21:59:17 2009
@@ -123,10 +123,10 @@
     
     case Buffer of
     [] ->
-        Result = {Written, WrittenLen};
+        Result = {lists:reverse(Written), WrittenLen};
     _ ->
         {ok, Pos} = couch_file:append_binary(Fd, lists:reverse(Buffer)),
-        Result = {[Pos|Written], WrittenLen + BufferLen}
+        Result = {lists:reverse(Written, [Pos]), WrittenLen + BufferLen}
     end,
     {stop, normal, Result, Stream}.