Elm 0.17で具体的なタイプのHTTPリクエストとデコード応答を作成するには？

Question

サーバにリクエストしてデコードされた値を返す関数を作成したいと思います。私は私の要求の中にカスタムヘッダを持っているので、私はHttp.send機能を使用しなければなりません。

は、これまでのところ私は、タスク

getCurrentUser userId authToken err ok = 
    let 
    request = 
     Http.send defaultSettings 
     { verb = "GET" 
     , headers = [("X-Auth", authToken)] 
     , url = "http://os.apiary.com" 
     , body = empty 
     } 

    in 
    Task.perform err ok request 

type alias User = { name : String, age : Maybe Int } 
userDecoder = object2 User ("name" := string) (maybe ("age" := int)) 

を作成することができましたが、私はどこデコードロジックを置くために知りません。

Answer 1

私はあなたがfromJsonを探していると思う：

getCurrentUser userId authToken err ok = 
    let 
    request = 
     Http.send defaultSettings 
     { verb = "GET" 
     , headers = [("X-Auth", authToken)] 
     , url = "http://os.apiary.com" 
     , body = empty 
     } 

    in 
    Http.fromJson userDecoder request 
     |> Task.perform err ok