Хранить тип HTML в postgresql результат в «байтах» - PullRequest
1 голос
/ 20 марта 2012

С yesod-0.10.1

Определение:

postBlogR :: Handler RepHtml
postBlogR = do
    ((res, articleWidget), enctype) <- runFormPost entryForm
    case res of
        FormSuccess article -> do
            articleId <- runDB $ insert article
            setMessage $ toHtml $ (articleTitle article) <> " created"
            redirect $ ArticleR articleId
        _ -> defaultLayout $ do
                setTitle "Please correct your entry form"
                $(widgetFile "articleAddError")

База данных

Article
    title Text
    content Html
    deriving

Я получу \x48656c6c6f2c20776f726c6421 в базе данных, если я отправлю Hello, world!

1 Ответ

1 голос
/ 20 марта 2012

Эта проблема появилась в списке рассылки (это вопрос от того же человека?). В любом случае, ответ здесь:

https://groups.google.com/d/topic/yesodweb/VMGqhS1QAsk/discussion

...