Author: jan
Date: Fri Jul  2 14:05:30 2010
New Revision: 959989

URL: http://svn.apache.org/viewvc?rev=959989&view=rev
Log:
Backport warning fix from a future version of ibrowse.

The current release makes our test suite fail and I don't
want to pester the 1.0.0 release cycle with this; yet I'd
like 1.0.0 (and 0.11.1) to be future proof for Erlang R14B.

Modified:
    couchdb/branches/0.11.x/src/ibrowse/ibrowse_http_client.erl

Modified: couchdb/branches/0.11.x/src/ibrowse/ibrowse_http_client.erl
URL: 
http://svn.apache.org/viewvc/couchdb/branches/0.11.x/src/ibrowse/ibrowse_http_client.erl?rev=959989&r1=959988&r2=959989&view=diff
==============================================================================
--- couchdb/branches/0.11.x/src/ibrowse/ibrowse_http_client.erl (original)
+++ couchdb/branches/0.11.x/src/ibrowse/ibrowse_http_client.erl Fri Jul  2 
14:05:30 2010
@@ -352,7 +352,7 @@ accumulate_response(Data, #state{reply_b
             stream_chunk_size = Stream_chunk_size,
             response_format = Response_format,
             caller_controls_socket = Caller_controls_socket} = CurReq,
-    RepBuf_1 = concat_binary([RepBuf, Data]),
+    RepBuf_1 = list_to_binary([RepBuf, Data]),
     New_data_size = RepBufSize - Streamed_size,
     case StreamTo of
        undefined ->
@@ -1201,9 +1201,9 @@ scan_crlf_1(Bin1_head_size, Bin1, Bin2) 
     case get_crlf_pos(Bin3) of
        {yes, Pos} ->
            {Prefix, <<_, _, Suffix/binary>>} = split_binary(Bin3, Pos),
-           {yes, concat_binary([Bin1_head, Prefix]), Suffix};
+           {yes, list_to_binary([Bin1_head, Prefix]), Suffix};
        no ->
-           {no, concat_binary([Bin1, Bin2])}
+           {no, list_to_binary([Bin1, Bin2])}
     end.
 
 get_crlf_pos(Bin) ->


Reply via email to