Source

haskellblog / src / Blog / Forms.hs

Diff from to

src/Blog/Forms.hs

                , timestamp = undefined
                , name = LB.empty
                , email = LB.empty
-               , text_raw = LB.empty
-               , text_formatted = undefined
+               , textraw = LB.empty
+               , textformatted = undefined
                , format = Plaintext
                , hidden = False
                , response = LB.empty
                     , timestamp = ts
                     , name = utf8 name
                     , email = utf8 email
-                    , text_raw = utf8 text
-                    , text_formatted = utf8 $ getFormatter format $ text
+                    , textraw = utf8 text
+                    , textformatted = utf8 $ getFormatter format $ text
                     , format = format
                     , hidden = False
                     , response = LB.empty