diff options
author | Jasper Van der Jeugt <m@jaspervdj.be> | 2011-11-25 23:05:50 +0100 |
---|---|---|
committer | Jasper Van der Jeugt <m@jaspervdj.be> | 2011-11-25 23:05:50 +0100 |
commit | 12b4e8a0b276829747dffd45ddb6fd89d0c61454 (patch) | |
tree | 5ad2cb5b1784c57967431f9f4fb23cd21a1b0a30 /tests/Hakyll/Web | |
parent | 3a4b45ef29cebf9f7110412e005a3dac5d6d6262 (diff) | |
download | hakyll-12b4e8a0b276829747dffd45ddb6fd89d0c61454.tar.gz |
Add escapeHtml function
Diffstat (limited to 'tests/Hakyll/Web')
-rw-r--r-- | tests/Hakyll/Web/Util/Html/Tests.hs | 4 |
1 files changed, 4 insertions, 0 deletions
diff --git a/tests/Hakyll/Web/Util/Html/Tests.hs b/tests/Hakyll/Web/Util/Html/Tests.hs index fc72cdf..e73c88b 100644 --- a/tests/Hakyll/Web/Util/Html/Tests.hs +++ b/tests/Hakyll/Web/Util/Html/Tests.hs @@ -15,4 +15,8 @@ tests = concat , "foo bar" @=? stripTags "<p>foo</p> bar" , "foo" @=? stripTags "<p>foo</p" ] + , fromAssertions "escapeHtml" + [ "Me & Dean" @=? escapeHtml "Me & Dean" + , "<img>" @=? escapeHtml "<img>" + ] ] |