Are you getting a compile-time error, or is the result at runtime not
what you expected? More details will be helpful here.
Michael
On Tue, Mar 29, 2011 at 8:58 PM, Zachary Kessin
Ok, I'm trying to setup a handler to take data from a HTTP post, and store it into a database, This is what I came up with, but its not right. Can someone tell me what I am doing wrong. postPostMessageR :: Handler RepJson postPostMessageR = do liftIO $ putStrLn "POST" CharecterPost clients _ <- getYesod (text, charecter) <- do text <- lookupPostParam "text" charecter <- lookupPostParam "charecter" case (text, charecter) of (Just text', Just charecter') -> return (text', charecter') _ -> invalidArgs ["text not provided."]
jsonToRepJson $ jsonMap (("text", text'),( "charecter", charecter'))
--Zach _______________________________________________ web-devel mailing list web-devel@haskell.org http://www.haskell.org/mailman/listinfo/web-devel