Merge pull request #2699 from IntersectMBO/fix/2676-non-exhaustive-patterns-in-case-while-handling-drep-info-request-on-the-backend

MSzalowski · web-flow · commit 5e2554cf0565 · 2025-01-23T13:03:48.000+01:00
fix(#2676): handle unexpected drep-info query result
diff --git a/CHANGELOG.md b/CHANGELOG.md
@@ -14,6 +14,7 @@ changes.
 
 - Add share DRep button to every DRep instead of only our own [Issue 2686](https://github.com/IntersectMBO/govtool/issues/2686)
 - Show metadata anchor in Governance Action Details [Issue 2178](https://github.com/IntersectMBO/govtool/issues/2178)
+- Handle unexpected drep info query result [Issue 2676](https://github.com/IntersectMBO/govtool/issues/2676)
 
 ### Fixed
 
diff --git a/govtool/backend/src/VVA/DRep.hs b/govtool/backend/src/VVA/DRep.hs
@@ -199,3 +199,4 @@ getDRepInfo drepId = withPool $ \conn -> do
         , dRepInfoImageHash = imageHash
         }
     [] -> return $ DRepInfo False False False False False Nothing Nothing Nothing Nothing Nothing Nothing Nothing Nothing Nothing Nothing Nothing Nothing Nothing Nothing Nothing
+    _ -> error "Unexpected result from database query in getDRepInfo"

Original file line number	Diff line number	Diff line change
`@@ -199,3 +199,4 @@ getDRepInfo drepId = withPool $ \conn -> do`
`199`	`199`	`, dRepInfoImageHash = imageHash`
`200`	`200`	`}`
`201`	`201`	`[] -> return $ DRepInfo False False False False False Nothing Nothing Nothing Nothing Nothing Nothing Nothing Nothing Nothing Nothing Nothing Nothing Nothing Nothing Nothing`
	`202`	`+ _ -> error "Unexpected result from database query in getDRepInfo"`