Bugfix: derp, pattern match for UniqueHistoryTrigger_p

This commit is contained in:
Scott Lystig Fritchie 2015-09-14 16:59:58 +09:00
parent a036f119a6
commit 4e11cdd50f

View file

@ -1549,8 +1549,8 @@ react_to_env_B10(Retries, P_newprop, P_latest, LatestUnanimousP, P_current_calc,
UniqueHistories = lists:usort(HistoryList),
UniqueHistoryTrigger_p = length(HistoryList) > (?MAX_HISTORY_LENGTH-1)
andalso case UniqueHistories of
[ [] ] -> false;
[ [MyName] ] -> false;
[ {[],[]} ] -> false;
[ {[MyName],[]} ] -> false;
[ _ ] -> true;
_ -> false
end,