Disable CSS minification when combining stylesheets #623

This commit is contained in:
Michael Snoyman 2013-11-21 22:44:16 +02:00
parent 7915510322
commit b81a9721fb
2 changed files with 5 additions and 2 deletions

View File

@ -101,7 +101,7 @@ import Filesystem (createTree)
import qualified Data.Text.Lazy as TL import qualified Data.Text.Lazy as TL
import qualified Data.Text.Lazy.Encoding as TLE import qualified Data.Text.Lazy.Encoding as TLE
import Data.Default import Data.Default
import Text.Lucius (luciusRTMinified) --import Text.Lucius (luciusRTMinified)
import Network.Wai.Application.Static import Network.Wai.Application.Static
( StaticSettings (..) ( StaticSettings (..)
@ -478,10 +478,13 @@ data CombineSettings = CombineSettings
instance Default CombineSettings where instance Default CombineSettings where
def = CombineSettings def = CombineSettings
{ csStaticDir = "static" { csStaticDir = "static"
{- Disabled due to: https://github.com/yesodweb/yesod/issues/623
, csCssPostProcess = \fps -> , csCssPostProcess = \fps ->
either (error . (errorIntro fps)) (return . TLE.encodeUtf8) either (error . (errorIntro fps)) (return . TLE.encodeUtf8)
. flip luciusRTMinified [] . flip luciusRTMinified []
. TLE.decodeUtf8 . TLE.decodeUtf8
-}
, csCssPostProcess = const return
, csJsPostProcess = const return , csJsPostProcess = const return
-- FIXME The following borders on a hack. With combining of files, -- FIXME The following borders on a hack. With combining of files,
-- the final location of the CSS is no longer fixed, so relative -- the final location of the CSS is no longer fixed, so relative

View File

@ -1,5 +1,5 @@
name: yesod-static name: yesod-static
version: 1.2.1 version: 1.2.1.1
license: MIT license: MIT
license-file: LICENSE license-file: LICENSE
author: Michael Snoyman <michael@snoyman.com> author: Michael Snoyman <michael@snoyman.com>