From 181f5fc0a8bffeb4028726320db60b7f930f9393 Mon Sep 17 00:00:00 2001 From: Anton Latukha Date: Thu, 17 Dec 2020 13:05:58 +0200 Subject: [PATCH] remote: cosmetic Co-authored-by: Richard Marko --- hnix-store-remote/src/System/Nix/Store/Remote.hs | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/hnix-store-remote/src/System/Nix/Store/Remote.hs b/hnix-store-remote/src/System/Nix/Store/Remote.hs index 23f73a8..fa0b5f4 100644 --- a/hnix-store-remote/src/System/Nix/Store/Remote.hs +++ b/hnix-store-remote/src/System/Nix/Store/Remote.hs @@ -218,7 +218,7 @@ queryPathInfoUncached path = do deriverPath <- sockGetPathMay narHashText <- Data.Text.Encoding.decodeUtf8 <$> sockGetStr - let narHash = case (System.Nix.Hash.decodeBase Base32 :: Text -> Either String (Digest a)) @'System.Nix.Hash.SHA256 narHashText of + let narHash = case System.Nix.Hash.decodeBase @'System.Nix.Hash.SHA256 Base32 narHashText of Left e -> error e Right x -> SomeDigest x