From 297c04002500db9f11351944275796c22bdb1c81 Mon Sep 17 00:00:00 2001 From: Jean-Paul Calderone <exarkun@twistedmatrix.com> Date: Wed, 7 Jun 2023 16:04:44 -0400 Subject: [PATCH] fix incorrect hlint fix :( --- src/Tahoe/Directory/Internal/Capability.hs | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/src/Tahoe/Directory/Internal/Capability.hs b/src/Tahoe/Directory/Internal/Capability.hs index 289eb59..09f69bb 100644 --- a/src/Tahoe/Directory/Internal/Capability.hs +++ b/src/Tahoe/Directory/Internal/Capability.hs @@ -66,7 +66,7 @@ pVerifySDMF :: Parser (DirectoryCapability SDMF.Verifier) pVerifySDMF = do s <- getInput setInput $ T.replace "URI:DIR2-Verifier:" "URI:SSK-Verifier:" s - DirectoryCapability SDMF.pVerifier + DirectoryCapability <$> SDMF.pVerifier {- | Parse an SDMF directory reader capability. As is the case for the other directory capability parsers, the implementation is cheesy. -- GitLab