runAuthorized :: Token -> Request -> API (Response L.ByteString)
runAuthorized token request = do
    manager <- ask
    io $ authorize token request `httpLbs` manager
runAuthorized :: Token -> Request -> API (Response L.ByteString)
runAuthorized token request = do
    manager <- ask
    io $ authorize token request `httpLbs` manager
runAuthorized token request = do
    manager <- ask
    io $ authorize token request `httpLbs` manager