From c36c4cf37737ba972482a34c8df2b61a541e7f0a Mon Sep 17 00:00:00 2001 From: Alexander Foremny <aforemny@posteo.de> Date: Wed, 19 Feb 2025 17:05:11 +0100 Subject: add `acms query` --- backend/lib/ACMS/API/REST/Collection.hs | 8 ++------ backend/lib/ACMS/API/REST/Collection/Paginated.hs | 3 ++- 2 files changed, 4 insertions(+), 7 deletions(-) (limited to 'backend/lib/ACMS/API/REST') diff --git a/backend/lib/ACMS/API/REST/Collection.hs b/backend/lib/ACMS/API/REST/Collection.hs index 7eea23b..7de1909 100644 --- a/backend/lib/ACMS/API/REST/Collection.hs +++ b/backend/lib/ACMS/API/REST/Collection.hs @@ -2,12 +2,8 @@ module ACMS.API.REST.Collection where -#ifndef ghcjs_HOST_OS -import Network.HTTP.Simple -#else -import ACMS.API.REST (setRequestMethod, setRequestBodyLBS) -#endif -import ACMS.API.REST (APIMonad, fetch, restRequest) +import ACMS.API.Fetch +import ACMS.API.REST (restRequest) import Collection import Data.Aeson qualified as A import Data.Function ((&)) diff --git a/backend/lib/ACMS/API/REST/Collection/Paginated.hs b/backend/lib/ACMS/API/REST/Collection/Paginated.hs index ad98888..159754a 100644 --- a/backend/lib/ACMS/API/REST/Collection/Paginated.hs +++ b/backend/lib/ACMS/API/REST/Collection/Paginated.hs @@ -3,7 +3,8 @@ module ACMS.API.REST.Collection.Paginated where -import ACMS.API.REST (APIMonad, fetch, restRequest) +import ACMS.API.Fetch +import ACMS.API.REST (restRequest) import Collection import Data.Aeson qualified as A import Data.Function ((&)) -- cgit v1.2.3