callAPI :: Method -> Token
        -> String             -- ^ path component of target API
        -> [(String, String)] -- ^ query parameters
        -> IO (Result JSValue)
callAPI m tok path query = callAPI' tok req EnumHttpClient
  where
    req = mkAPIRequest m (path ++ ".json") query
callAPI :: Method -> Token
        -> String             -- ^ path component of target API
        -> [(String, String)] -- ^ query parameters
        -> IO (Result JSValue)
callAPI m tok path query = callAPI' tok req EnumHttpClient
  where
    req = mkAPIRequest m (path ++ ".json") query
callAPI m tok path query = callAPI' tok req EnumHttpClient
  where
    req = mkAPIRequest m (path ++ ".json") query