Merge pull request #2779 from IntersectMBO/fix/2778-exception-multipl…

…e-voting-power-entries-for-stake-key-e12dc5c13fc0d978cc770a34cf170428a7ca3234f8 fix(#2778): exception when there is no voting power for given stake key
IntersectMBO · Jan 28, 2025 · 7859cc2 · 7859cc2
2 parents 5400abe + 32b8f2a
commit 7859cc2
Showing 1 changed file with 6 additions and 1 deletion.
diff --git a/govtool/backend/src/VVA/AdaHolder.hs b/govtool/backend/src/VVA/AdaHolder.hs
@@ -60,4 +60,9 @@ getStakeKeyVotingPower stakeKey = withPool $ \conn -> do
         Text.putStrLn ("couldn't fetch voting power for stake key: " <> stakeKey)
         return 0
       Right [(votingPower,_)] -> return $ floor votingPower
-      _ -> error ("multiple voting power entries for stake key: " <> unpack stakeKey)
+      Right [] -> do
+        Text.putStrLn ("No voting power found for stake key: " <> stakeKey)
+        return 0
+      Right _ -> do
+        Text.putStrLn ("Unexpected result for stake key: " <> stakeKey)
+        return 0