summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
-rw-r--r--src/election.adb4
1 files changed, 2 insertions, 2 deletions
diff --git a/src/election.adb b/src/election.adb
index 7e825b3..ddbdb26 100644
--- a/src/election.adb
+++ b/src/election.adb
@@ -556,8 +556,8 @@ package body Election is
for R in Running.Iterate loop
Votes_To_Be_Excluded := Running.Reference (R).Total_Votes;
- exit when Number_Excluded > 0 and
- Votes_Excluded + Votes_To_Be_Excluded > Applied_Breakpoint;
+ exit when Integer (Running.Length) - Number_Excluded <= Vacancies + 1 or
+ (Number_Excluded > 0 and Votes_Excluded + Votes_To_Be_Excluded > Applied_Breakpoint);
Working_Position := Running.Reference (R).Index;
Working_ID := Entries.Reference (Working_Position).ID;