diff options
| author | Nicole Rauch <nicole.m@gmx.de> | 2016-08-14 19:34:52 +0200 |
|---|---|---|
| committer | Nicole Rauch <nicole.m@gmx.de> | 2016-08-14 22:13:31 +0200 |
| commit | c6fdffc0a06c9185a062b1e4f9fb1088417754b5 (patch) | |
| tree | ac08a2550089a4aab506e7c7d1bed6254e65bb30 /tests | |
| parent | 0404185e835fb11bec70882b695df7b53c3dd451 (diff) | |
| download | hakyll-c6fdffc0a06c9185a062b1e4f9fb1088417754b5.tar.gz | |
Compacted the tests and made them more readable.
Diffstat (limited to 'tests')
| -rw-r--r-- | tests/Hakyll/Web/CompressCss/Tests.hs | 33 |
1 files changed, 11 insertions, 22 deletions
diff --git a/tests/Hakyll/Web/CompressCss/Tests.hs b/tests/Hakyll/Web/CompressCss/Tests.hs index 44dfc6c..a7b94ab 100644 --- a/tests/Hakyll/Web/CompressCss/Tests.hs +++ b/tests/Hakyll/Web/CompressCss/Tests.hs @@ -25,34 +25,23 @@ tests = testGroup "Hakyll.Web.CompressCss.Tests" $ concat compressCss " something \n\t\r something " -- strip comments - , "" @=? - compressCss "/* abc { } ;; \n\t\r */" + , "" @=? compressCss "/* abc { } ;; \n\t\r */" -- compress separators - , "}" @=? - compressCss "; }" - , "{};" @=? - compressCss " { } ; " + , "}" @=? compressCss "; }" + , "{};" @=? compressCss " { } ; " -- but do not compress separators inside of constants - , "\" { } ; \"" @=? - compressCss "\" { } ; \"" + , "\" { } ; \"" @=? compressCss "\" { } ; \"" -- don't compress separators at the start or end of constants - , "\" }\"" @=? - compressCss "\" }\"" - , "\"{ \"" @=? - compressCss "\"{ \"" + , "\" }\"" @=? compressCss "\" }\"" + , "\"{ \"" @=? compressCss "\"{ \"" -- don't get irritated by the wrong constant terminator - , "\" ' \"" @=? - compressCss "\" ' \"" - , "' \" '" @=? - compressCss "' \" '" + , "\" ' \"" @=? compressCss "\" ' \"" + , "' \" '" @=? compressCss "' \" '" -- don't compress whitespace in constants in the middle of a string - , "abc '{ '" @=? - compressCss "abc '{ '" - , "abc \"{ \"" @=? - compressCss "abc \"{ \"" + , "abc '{ '" @=? compressCss "abc '{ '" + , "abc \"{ \"" @=? compressCss "abc \"{ \"" -- compress multiple semicolons - , ";" @=? - compressCss ";;;;;;;" + , ";" @=? compressCss ";;;;;;;" ] ] |