Gadz, more sequencer cleanup. corfurl_test now passes

This commit is contained in:
Scott Lystig Fritchie 2014-09-20 21:46:25 +09:00
parent 30fc62ab22
commit 03f071316c

View file

@ -39,9 +39,10 @@ append_page(Proj, Page, StreamList) ->
append_page(Proj, _Page, _StreamList, 0) ->
{{error_failed, ?MODULE, ?LINE}, Proj};
%% TODO: remove _StreamList arg entirely?
append_page(#proj{seq={Sequencer,_,_}} = Proj, Page, StreamList, Retries) ->
try
{ok, LPN} = corfurl_sequencer:get(Sequencer, 1, StreamList),
{ok, LPN} = corfurl_sequencer:get(Sequencer, 1),
pulse_tracing_add(write, LPN),
append_page1(Proj, LPN, Page, StreamList, 5)
catch