Skip to content

Commit 06dda47

Browse files
committed
Remove ZeroTries constructor
1 parent ec31a21 commit 06dda47

1 file changed

Lines changed: 0 additions & 6 deletions

File tree

src/Network/HTTP/Download/Verified.hs

Lines changed: 0 additions & 6 deletions
Original file line numberDiff line numberDiff line change
@@ -92,8 +92,6 @@ data VerifiedDownloadException
9292
String -- algorithm
9393
CheckHexDigest -- expected
9494
String -- actual (shown)
95-
| ZeroTries
96-
Request
9795
deriving (Typeable)
9896
instance Show VerifiedDownloadException where
9997
show (WrongContentLength req expected actual) =
@@ -111,10 +109,6 @@ instance Show VerifiedDownloadException where
111109
++ "Expected: " ++ displayCheckHexDigest expected ++ "\n"
112110
++ "Actual: " ++ actual ++ "\n"
113111
++ "For: " ++ show (getUri req)
114-
show (ZeroTries req) =
115-
"Download expectation failure:\n"
116-
++ "Download was needed but <= 0 retries were requested.\n"
117-
++ "For: " ++ show (getUri req)
118112

119113
instance Exception VerifiedDownloadException
120114

0 commit comments

Comments
 (0)