summaryrefslogtreecommitdiff
path: root/tests
diff options
context:
space:
mode:
authorNicole Rauch <nicole.m@gmx.de>2016-08-14 19:23:10 +0200
committerNicole Rauch <nicole.m@gmx.de>2016-08-14 22:13:31 +0200
commit0404185e835fb11bec70882b695df7b53c3dd451 (patch)
tree892f139455955ef9129069309f93fd1a74929ce3 /tests
parentc0a86b3d7e759fa060e091df0a3ae7d0df6354ce (diff)
downloadhakyll-0404185e835fb11bec70882b695df7b53c3dd451.tar.gz
We need to constantly check whether we are at the start of a constant, not just once.
Diffstat (limited to 'tests')
-rw-r--r--tests/Hakyll/Web/CompressCss/Tests.hs10
1 files changed, 6 insertions, 4 deletions
diff --git a/tests/Hakyll/Web/CompressCss/Tests.hs b/tests/Hakyll/Web/CompressCss/Tests.hs
index c8db116..44dfc6c 100644
--- a/tests/Hakyll/Web/CompressCss/Tests.hs
+++ b/tests/Hakyll/Web/CompressCss/Tests.hs
@@ -46,11 +46,13 @@ tests = testGroup "Hakyll.Web.CompressCss.Tests" $ concat
compressCss "\" ' \""
, "' \" '" @=?
compressCss "' \" '"
+ -- don't compress whitespace in constants in the middle of a string
+ , "abc '{ '" @=?
+ compressCss "abc '{ '"
+ , "abc \"{ \"" @=?
+ compressCss "abc \"{ \""
+ -- compress multiple semicolons
, ";" @=?
compressCss ";;;;;;;"
-
- -- some real-life css
- , "a:after{content: \" (\" attr(href) \")\"}" @=?
- compressCss "a:after { content: \" (\" attr(href) \")\"; }"
]
]