Refactor some nix code for readability

1 files changed, 12 insertions, 12 deletions

diff --git a/Biz/Bild/Deps.nix b/Biz/Bild/Deps.nix
index bc27b18..dd1ed45 100644
--- a/Biz/Bild/Deps.nix
+++ b/Biz/Bild/Deps.nix
@@ -1,23 +1,20 @@
 _: pkgs:
 
 let
-  simpleCabalBuilder = self: name:
+  buildCabal = self: name:
       self.callCabal2nix name pkgs.sources.${name} {};
-  buildCabal = self: name: subdir:
-    if isNull subdir then
-      self.callCabal2nix name pkgs.sources.${name} {}
-    else
-      self.callCabal2nix name (pkgs.sources.${name} + "/${subdir}") {};
+  buildCabalSubdir = self: {name, src ? pkgs.sources.${name}, subdir ? name}:
+      self.callCabal2nix name (src + "/${subdir}") {};
 in rec
 {
   haskell = pkgs.haskell // {
     packages = pkgs.haskell.packages // {
       ghc865 = pkgs.haskell.packages.ghc865.override (old: {
         overrides = with pkgs.pkgs.haskell.lib; self: super:
-          pkgs.overridePinnedDeps (simpleCabalBuilder self) // {
+          pkgs.overridePinnedDeps (buildCabal self) // {
           acid-state = dontCheck super.acid-state; # mac: "too many open files"
           ghcjs-base = null; # otherwise ghc tries to build this via overridePinnedDeps
-          servant-auth = buildCabal self "servant-auth" "servant-auth";
+          servant-auth = buildCabalSubdir self {name = "servant-auth";};
           servant-server = doJailbreak super.servant-server;
           stripe-haskell = dontCheck super.stripe-haskell;
           stripe-http-client = dontCheck super.stripe-http-client;
@@ -27,20 +24,23 @@ in rec
       });
       ghcjs86 = pkgs.haskell.packages.ghcjs86.override (old: {
         overrides = with pkgs.haskell.lib; self: super:
-          pkgs.overridePinnedDeps (simpleCabalBuilder self) // {
+          pkgs.overridePinnedDeps (buildCabal self) // {
           Glob = dontCheck super.Glob;
           QuickCheck = dontCheck super.QuickCheck;
           aeson = dontCheck super.aeson;
           base-compat-batteries = dontCheck super.base-compat-batteries;
           clay = dontCheck super.clay;
           comonad = dontCheck super.comonad;
-          ghcjs-base = dontCheck (simpleCabalBuilder self "ghcjs-base");
-          jsaddle-warp = dontCheck (self.callCabal2nix "jsaddle-warp" "${pkgs.sources.jsaddle}/jsaddle-warp" {});
+          ghcjs-base = dontCheck (buildCabal self "ghcjs-base");
+          jsaddle-warp = dontCheck (buildCabalSubdir self {
+            name = "jsaddle-warp";
+            src = pkgs.sources.jsaddle;
+          });
           http-types = dontCheck super.http-types;
           network-uri= dontCheck super.network-uri;
           scientific = dontCheck super.scientific; # takes forever
           servant = dontCheck super.servant;
-          servant-auth = buildCabal self "servant-auth" "servant-auth";
+          servant-auth = buildCabalSubdir self "servant-auth";
           tasty-quickcheck = dontCheck super.tasty-quickcheck;
           temporary = dontCheck super.temporary;
           time-compat = dontCheck super.time-compat;