module Reddit.Routes.Captcha where import Reddit.Types.Captcha import Network.API.Builder.Routes needsCaptcha :: Route needsCaptcha :: Route needsCaptcha = [URLPiece] -> [URLParam] -> Method -> Route Route [ URLPiece "api", URLPiece "needs_captcha.json" ] [ ] Method "GET" newCaptcha :: Route newCaptcha :: Route newCaptcha = [URLPiece] -> [URLParam] -> Method -> Route Route [ URLPiece "api", URLPiece "new_captcha" ] [ ] Method "POST" getCaptcha :: CaptchaID -> Route getCaptcha :: CaptchaID -> Route getCaptcha (CaptchaID URLPiece c) = [URLPiece] -> [URLParam] -> Method -> Route Route [ URLPiece "captcha", URLPiece c ] [ ] Method "GET"