Merge pull request #2780 from IntersectMBO/develop

fix(#2778): exception when there is no voting power for given stake key
IntersectMBO · Jan 28, 2025 · 51df9e8 · 51df9e8
2 parents 631e886 + 7859cc2
commit 51df9e8
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