api-builder 0.6.0.0 → 0.7.0.0

raw patch · 2 files changed

+3/−15 lines, 2 filesdep −datetimedep ~base

Dependencies removed: datetime

Dependency ranges changed: base

Files

• api-builder.cabal +3/−5
• src/Network/API/Builder/Query.hs +0/−10

@@ -1,5 +1,5 @@ name: api-builder-version: 0.6.0.0+version: 0.7.0.0 synopsis: Library for easily building REST API wrappers in Haskell license: BSD3 author: Fraser Murray@@ -17,7 +17,7 @@ source-repository this   type: git   location: git://github.com/intolerable/api-builder.git-  tag: v0.6.0.0+  tag: v0.7.0.0  library   exposed-modules:@@ -32,7 +32,7 @@     Network.API.Builder.Send     Network.API.Builder.Send.Multipart   build-depends:-    base >= 4.6 && < 4.8,+    base >= 4.6 && < 4.9,     aeson >= 0.7 && < 0.9,     attoparsec >= 0.11 && < 0.13,     bifunctors == 4.*,@@ -65,7 +65,6 @@     api-builder,     aeson,     bytestring,-    datetime,     hspec,     http-conduit,     text,@@ -86,7 +85,6 @@     aeson,     bytestring,     containers,-    datetime,     hspec,     text,     transformers

@@ -1,6 +1,5 @@ module Network.API.Builder.Query where -import Data.Monoid import Data.Text (Text) import qualified Data.Text as Text @@ -27,12 +26,3 @@ instance ToQuery a => ToQuery [a] where   toQuery _ [] = []   toQuery k xs = [(k, Text.intercalate "," $ map snd $ concatMap (toQuery k) xs)]--newtype IndexedList a = IndexedList [a]-  deriving (Show, Read, Eq)--instance ToQuery a => ToQuery (IndexedList a) where-  toQuery _ (IndexedList []) = []-  toQuery k (IndexedList l) =-    zipWith (\n (x, y) -> (x <> "[" <> tshow n <> "]", y)) ([0..] :: [Integer]) $ concatMap (toQuery k) l-    where tshow = Text.pack . show