diff options
| author | Christine Dodrill <me@christine.website> | 2016-12-17 21:14:25 -0800 |
|---|---|---|
| committer | Christine Dodrill <me@christine.website> | 2016-12-17 21:14:25 -0800 |
| commit | 62ffa5f0089f5f11c069f017b0dc69df6141de34 (patch) | |
| tree | 04d334f22333746895a1698646822fc2d20b7462 /frontend/src/BlogEntry.purs | |
| parent | dee2a2605cb2df6bd638d5ab5b4a2dc304574907 (diff) | |
| download | xesite-62ffa5f0089f5f11c069f017b0dc69df6141de34.tar.xz xesite-62ffa5f0089f5f11c069f017b0dc69df6141de34.zip | |
uglify javascript
Diffstat (limited to 'frontend/src/BlogEntry.purs')
| -rw-r--r-- | frontend/src/BlogEntry.purs | 6 |
1 files changed, 3 insertions, 3 deletions
diff --git a/frontend/src/BlogEntry.purs b/frontend/src/BlogEntry.purs index f64f127..9286619 100644 --- a/frontend/src/BlogEntry.purs +++ b/frontend/src/BlogEntry.purs @@ -9,9 +9,9 @@ import Data.Maybe (Maybe(..)) import Network.HTTP.Affjax (AJAX, get) import Prelude (bind, pure, show, ($), (<>), (<<<)) import Pux (EffModel, noEffects) -import Pux.Html (Html, div, h1, p, text) -import Pux.Html.Attributes (className, id_, title) import Pux.DocumentTitle (documentTitle) +import Pux.Html (Html, div, h1, p, text) +import Pux.Html.Attributes (dangerouslySetInnerHTML, className, id_, title) data Action = RequestPost | ReceivePost (Either String Post) @@ -76,5 +76,5 @@ view { id: id, status: status, post: (Post post) } = [ h1 [] [ text status ] , documentTitle [ title $ post.title <> " - Christine Dodrill" ] [] , div [ className "col s8 offset-s2" ] - [ p [ id_ "blogpost" ] [ text post.body ] ] + [ p [ id_ "blogpost", dangerouslySetInnerHTML post.body ] [] ] ] |