From 5fddf3c66ba1bcabb72c4d6b6e09fb41a7acd62c Mon Sep 17 00:00:00 2001 From: Guillaume Maudoux Date: Wed, 24 Mar 2021 02:26:50 +0100 Subject: [PATCH] Reorder references in makeTextPath --- hnix-store-core/src/System/Nix/ReadonlyStore.hs | 3 ++- 1 file changed, 2 insertions(+), 1 deletion(-) diff --git a/hnix-store-core/src/System/Nix/ReadonlyStore.hs b/hnix-store-core/src/System/Nix/ReadonlyStore.hs index ad966ae..beea22f 100644 --- a/hnix-store-core/src/System/Nix/ReadonlyStore.hs +++ b/hnix-store-core/src/System/Nix/ReadonlyStore.hs @@ -8,6 +8,7 @@ module System.Nix.ReadonlyStore where import Data.ByteString ( ByteString ) import qualified Data.ByteString as BS +import Data.List ( sort ) import qualified Data.Text as T import qualified Data.HashSet as HS import Data.Text.Encoding @@ -41,7 +42,7 @@ makeTextPath makeTextPath fp nm h refs = makeStorePath fp ty h nm where ty = - BS.intercalate ":" ("text" : fmap storePathToRawFilePath (HS.toList refs)) + BS.intercalate ":" ("text" : sort (fmap storePathToRawFilePath (HS.toList refs))) makeFixedOutputPath :: forall hashAlgo