is_empty not in OTP16

bloody OTP16 strikes again - is_empty isn't there
This commit is contained in:
martinsumner 2017-02-09 21:12:01 +00:00
parent 62a39936a5
commit 05b2d8faaf

View file

@ -225,14 +225,13 @@ do_merge(KL1, KL2, SinkLevel, SinkB, RP, NewSQN, MaxSQN, Additions) ->
return_deletions(ManifestSQN, PendingDeletionD) -> return_deletions(ManifestSQN, PendingDeletionD) ->
case dict:is_empty(PendingDeletionD) of case dict:find(ManifestSQN, PendingDeletionD) of
true -> {ok, PendingDeletions} ->
leveled_log:log("PC020", [ManifestSQN]),
{[], PendingDeletionD};
false ->
leveled_log:log("PC021", [ManifestSQN]), leveled_log:log("PC021", [ManifestSQN]),
{dict:fetch(ManifestSQN, PendingDeletionD), {PendingDeletions, dict:erase(ManifestSQN, PendingDeletionD)};
dict:erase(ManifestSQN, PendingDeletionD)} error ->
leveled_log:log("PC020", [ManifestSQN]),
{[], PendingDeletionD}
end. end.
%%%============================================================================ %%%============================================================================