add cli to nix packages

backend/lib/ACMS/API/REST/Collection.hs

@@ -39,16 +39,16 @@ update c i o =
     & httpLBS
     >>= A.throwDecode . getResponseBody
 
-create :: T.Text -> A.Object -> IO ()
+create :: T.Text -> A.Object -> IO U.UUID
 create c o = do
   uuid <- U.nextRandom
   let i = U.toText uuid <> ".json"
-  "http://localhost:8081"
+  response <- "http://localhost:8081"
     & setRequestMethod "POST"
     & setRequestBodyLBS
       (LB.fromString (printf "INSERT %s INTO %s" (LB.toString (A.encode (AM.insert "$fileName" (A.String i) o))) c))
     & httpLBS
-    >>= A.throwDecode . getResponseBody
+  uuid <$ A.throwDecode @() (getResponseBody response)
 
 delete :: T.Text -> T.Text -> IO [A.Object]
 delete c i =

default.nix

@@ -9,7 +9,8 @@ let
       backend = self.callCabal2nix "backend" ./backend { };
       common = self.callCabal2nix "common" ./common { };
       frontend = self.callCabal2nix "frontend" ./frontend { };
-      sh = self.callCabal2nix "sh" sources.sh { };
+      cli = self.callCabal2nix "cli" ./cli { };
+      sh = pkgs.haskell.lib.dontCheck (self.callCabal2nix "sh" sources.sh { });
       websockets = pkgs.haskell.lib.doJailbreak super.websockets;
     };
   };
@@ -29,6 +30,7 @@ rec {
       haskellPackages.autotypes
       haskellPackages.backend
       haskellPackages.common
+      haskellPackages.cli
       haskellPackages.frontend
     ];
     buildInputs = [
@@ -36,6 +38,7 @@ rec {
       haskellPackages.autotypes
       haskellPackages.cabal-install
       haskellPackages.ormolu
+      pkgs.niv
       (pkgs.writeScriptBin "reload" ''
         set -efu
         ${haskellPackages.ghcid.bin}/bin/ghcid -c \

nix/sources.json

@@ -2,7 +2,7 @@
     "json2sql": {
         "branch": "main",
         "repo": "git@code.nomath.org:~/json2sql",
-        "rev": "ff448719b9fa0463639440dcdfcca17294a02d83",
+        "rev": "56fccc922fd3d7fdf748b7d2b6cf1df4e48bceb2",
         "type": "git"
     },
     "nixpkgs": {