From 8f11bbd1d7cd81572ddc433aa1706bc2d2db4c8d Mon Sep 17 00:00:00 2001
From: Nicole Rauch <nicole.m@gmx.de>
Date: Sun, 14 Aug 2016 19:37:29 +0200
Subject: Improved the compaction a bit more.

---
 src/Hakyll/Web/CompressCss.hs | 3 +--
 1 file changed, 1 insertion(+), 2 deletions(-)

(limited to 'src')

diff --git a/src/Hakyll/Web/CompressCss.hs b/src/Hakyll/Web/CompressCss.hs
index aac48b1..23adce2 100644
--- a/src/Hakyll/Web/CompressCss.hs
+++ b/src/Hakyll/Web/CompressCss.hs
@@ -39,11 +39,10 @@ compressSeparators str
     | isPrefixOf "'" str = head str : retainConstants compressSeparators "'" (drop 1 str)
     | stripFirst = compressSeparators (drop 1 str)
     | stripSecond = compressSeparators (head str : (drop 2 str))
-    | isPrefixOf ";}" str = '}' : compressSeparators (drop 2 str)
     | otherwise = head str : compressSeparators (drop 1 str)
   where
     prefix p = isPrefixOf p str
-    stripFirst = or $ map prefix ["  ", " {", " }", ";;"]
+    stripFirst = or $ map prefix ["  ", " {", " }", ";;", ";}"]
     stripSecond = or $ map prefix ["{ ", "} ", "; "]
 
 --------------------------------------------------------------------------------
-- 
cgit v1.2.3