diff options
author | Jasper Van der Jeugt <jaspervdj@gmail.com> | 2010-02-16 19:18:53 +0100 |
---|---|---|
committer | Jasper Van der Jeugt <jaspervdj@gmail.com> | 2010-02-16 19:18:53 +0100 |
commit | c9d4624a42c231ed200b69f1d6bf51c323febbbb (patch) | |
tree | c89427172b9205e0f7d28392ecd292d532f51e49 /tests/CompressCSS.hs | |
parent | 87e7e99a8c1ced4a861d3d801c4fb4ea7d615dcf (diff) | |
download | hakyll-c9d4624a42c231ed200b69f1d6bf51c323febbbb.tar.gz |
Updated tests.
Diffstat (limited to 'tests/CompressCSS.hs')
-rw-r--r-- | tests/CompressCSS.hs | 35 |
1 files changed, 0 insertions, 35 deletions
diff --git a/tests/CompressCSS.hs b/tests/CompressCSS.hs deleted file mode 100644 index 855efcf..0000000 --- a/tests/CompressCSS.hs +++ /dev/null @@ -1,35 +0,0 @@ -module CompressCSS - ( compressCSSGroup - ) where - -import qualified Data.Map as M - -import Data.Binary -import Test.Framework (testGroup) -import Test.Framework.Providers.HUnit -import Test.Framework.Providers.QuickCheck2 -import Test.HUnit - -import Text.Hakyll.Internal.CompressCSS - --- CompressCSS test group. -compressCSSGroup = testGroup "CompressCSS" - [ testProperty "prop_compressCSS_length" prop_compressCSS_length - , testCase "test_compressCSS_1" test_compressCSS_1 - , testCase "test_compressCSS_2" test_compressCSS_2 - , testCase "test_compressCSS_3" test_compressCSS_3 - , testCase "test_compressCSS_4" test_compressCSS_4 - ] - --- CSS compression should always decrease the text length. -prop_compressCSS_length str = length str >= length (compressCSS str) - --- Compress CSS test cases. -test_compressCSS_1 = compressCSS "a { \n color : red; }" @?= "a{color:red}" -test_compressCSS_2 = compressCSS "img {border :none;;;; }" - @?= "img{border:none}" -test_compressCSS_3 = - compressCSS "p {font-size : 90%;} h1 {color :white;;; }" - @?= "p{font-size:90%}h1{color:white}" -test_compressCSS_4 = compressCSS "a { /* /* red is pretty cool */ color: red; }" - @?= "a{color:red}" |