Skip to content

Instantly share code, notes, and snippets.

Embed
What would you like to do?
getRandomGif : String -> Effects Action
getRandomGif topic =
Http.get decodeUrl (randomUrl topic)
|> Task.toMaybe
|> Task.map NewGif
|> Effects.task
-- getRandomGifはGETメソッドをもつHTTPリクエストを発行している。
-- randomUrl関数はtopicを引数にJSONを返す。
-- decodeUrl関数は受け取ったJSONをデコードする。
-- それぞれの関数は以下に定義されている。
randomUrl : String -> String
randomUrl topic =
Http.url "http://api.giphy.com/v1/gifs/random"
[ ("api_key", "dc6zaTOxFJmzC")
, ("tag", topic)
]
-- topicが与えられて、giphyAPIのためのURLを生成する。
decodeUrl : Json.Decoder String
decodeUrl =
Json.at ["data", "image_url"] Json.string
-- 巨大なJSONから、json.data.image_urlを取得する。
Sign up for free to join this conversation on GitHub. Already have an account? Sign in to comment