home::Controller()
home = do posts <- PostsModel.findAll :: Controller [Posts]
          setViewDataValue "posts-titles" $ map (\p -> (Prelude.show(fromJust(_id p)),title p)) posts
          return ()
home::Controller()
home = do posts <- PostsModel.findAll :: Controller [Posts]
          setViewDataValue "posts-titles" $ map (\p -> (Prelude.show(fromJust(_id p)),title p)) posts
          return ()
home = do posts <- PostsModel.findAll :: Controller [Posts]
          setViewDataValue "posts-titles" $ map (\p -> (Prelude.show(fromJust(_id p)),title p)) posts
          return ()