path: root/Request.hs

module Request where

-- Request query url method
data Request = Request String String String

getQuery (Request query _ _) = query

getUrl (Request _ url _) = url

getMethod (Request _ _ method) = method