getRequest :: (MonadThrow m, MonadIO m, MonadBaseControl IO m) =>
  String ->
  [ (String, String) ] ->
  m L.ByteString
getRequest = makeRequest GET
getRequest :: (MonadThrow m, MonadIO m, MonadBaseControl IO m) =>
  String ->
  [ (String, String) ] ->
  m L.ByteString
getRequest = makeRequest GET
getRequest = makeRequest GET