From f86b3b0962b751e83cec9b5e49cc17513cb281fb Mon Sep 17 00:00:00 2001
From: Daniel Firth <dan.firth@homotopic.tech>
Date: Fri, 30 Dec 2022 10:43:32 +0000
Subject: [PATCH] horizon.dhall: add callGitKvStoreEffectful

---
 horizon.dhall | 29 ++++++++++++-----------------
 1 file changed, 12 insertions(+), 17 deletions(-)

diff --git a/horizon.dhall b/horizon.dhall
index 76c287ba..2424fa74 100644
--- a/horizon.dhall
+++ b/horizon.dhall
@@ -27,6 +27,14 @@ let callGitCursorDirforest
           "6ad5b168e26eb4e647df9f007d812aaf59338d40"
           (Some subdir)
 
+let callGitKvStoreEffectful
+    : H.Subdir → H.HaskellPackage.Type
+    = λ(subdir : H.Subdir) →
+        H.callGit
+          "https://github.com/TeofilC/servant"
+          "3502825423aea3a1af9384e9d751feea4599c60b"
+          (Some subdir)
+
 let callGitServant
     : H.Subdir → H.HaskellPackage.Type
     = λ(subdir : H.Subdir) →
@@ -453,26 +461,13 @@ let packages =
       , js-jquery = H.callHackage "js-jquery" "3.3.1"
       , kan-extensions = H.callHackage "kan-extensions" "5.2.5"
       , keys = H.callHackage "keys" "3.12.3"
-      , kvstore-effectful =
-          H.callGit
-            "https://github.com/haskell-effectful/kvstore-effectful"
-            "3502825423aea3a1af9384e9d751feea4599c60b"
-            (Some "kvstore-effectful")
+      , kvstore-effectful = callGitKvStoreEffectful "kvstore-effectful"
       , kvstore-effectful-cache =
-          H.callGit
-            "https://github.com/haskell-effectful/kvstore-effectful"
-            "3502825423aea3a1af9384e9d751feea4599c60b"
-            (Some "kvstore-effectful-cache")
+          callGitKvStoreEffectful "kvstore-effectful-cache"
       , kvstore-effectful-spec =
-          H.callGit
-            "https://github.com/haskell-effectful/kvstore-effectful"
-            "3502825423aea3a1af9384e9d751feea4599c60b"
-            (Some "kvstore-effectful-spec")
+          callGitKvStoreEffectful "kvstore-effectful-spec"
       , kvstore-effectful-statemap =
-          H.callGit
-            "https://github.com/haskell-effectful/kvstore-effectful"
-            "3502825423aea3a1af9384e9d751feea4599c60b"
-            (Some "kvstore-effectful-statemap")
+          callGitKvStoreEffectful "kvstore-effectful-statemap"
       , language-c = H.callHackage "language-c" "0.9.1"
       , language-haskell-extract =
           H.callGit
-- 
GitLab