エルム：チェーンHttp.sendとHttp.get

Question

私は（初心者）ですが、私のエルムアプリケーションでHTTP呼び出しにチェーンにしようタイプの問題を持つ：

Http.send ... `Task.andThen` (\_ -> Http.get ...) 

Http.send戻り値の型がTask RawError Responseあるためです、 およびHttp.get戻り値の型はTask Error valueです。

どのように連携させるかについてのご意見はありますか？

EDIT1：

たぶんmapErrorソリューションですか？

EDIT2：

私は、私はそれが動作すると確信している、最初の呼び出しが失敗したことを言っていません。

The right argument of `andThen` is causing a type mismatch. 

135│  Http.send Http.defaultSettings config 
136│>  `Task.andThen` (\_ -> Http.get (Json.Decode.list userJsonDecoder) "http://localhost:3000/") 

`andThen` is expecting the right argument to be a: 

    Http.Response -> Task Http.RawError a 

But the right argument is: 

    Http.Response -> Task Http.Error (List User) 

Answer 1

あなたはErrorへRawErrorをマッピングする方法が必要ですし、あなたの最初の編集で提案されているように、あなたがTask.mapErrorを使用することができます：それは私のコードを検証しませんコンパイラです。 1つの可能性は：

rawErrorToError : Http.RawError -> Http.Error 
rawErrorToError rawError = 
    case rawError of 
    Http.RawTimeout -> Http.Timeout 
    Http.RawNetworkError -> Http.NetworkError 

Http.send Http.defaultSettings config 
|> Task.mapError rawErrorToError 
`Task.andThen` ...