-- | The original parser of basic CSS, but throws out media queries
parseBlocks :: Text -> Either String [CssBlock]
parseBlocks = parseOnly blocksParser
parseBlocks :: Text -> Either String [CssBlock]
parseBlocks = parseOnly blocksParser
parseBlocks = parseOnly blocksParser