haskell Basic mime-type handling types and functions yesodweb/wai