module Lucienne.Controller.NotFound (notFound) where import qualified Happstack.Server as S import Lucienne.Controller.Imports notFound :: String -> Controller Response notFound url = S.notFound $ toResponse $ "Not found: " ++ url