From 3847375b647d078019a930e2ec1235fa5598f8fa Mon Sep 17 00:00:00 2001 From: Adrian Cochrane Date: Wed, 22 Apr 2020 21:22:50 +1200 Subject: [PATCH] Remove preceding whitespace from all CSS at-rules. --- src/Data/CSS/Syntax/StyleSheet.hs | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/src/Data/CSS/Syntax/StyleSheet.hs b/src/Data/CSS/Syntax/StyleSheet.hs index e88a69a..bd23516 100644 --- a/src/Data/CSS/Syntax/StyleSheet.hs +++ b/src/Data/CSS/Syntax/StyleSheet.hs @@ -77,7 +77,7 @@ parse' stylesheet (Comma:tokens) = parse' stylesheet tokens -- TODO issue warnin parse' stylesheet [] = stylesheet parse' stylesheet (AtKeyword kind:tokens) = parse' stylesheet' tokens' - where (stylesheet', tokens') = addAtRule stylesheet kind tokens + where (stylesheet', tokens') = addAtRule stylesheet kind $ skipSpace tokens parse' stylesheet tokens = parse' (addRules stylesheet rule) tokens' where (rule, tokens') = concatP (,) parseSelectors parseProperties tokens -- 2.30.2