playing with a haskell web app