Improve function layout.

2018-07-01 14:54:41 +03:00 · 2018-07-01 14:54:41 +03:00 · 787b7f060f
commit 787b7f060f
parent ea3047902a
1 changed files with 1 additions and 2 deletions
--- a/src/Text/HTML/SanitizeXSS.hs
+++ b/src/Text/HTML/SanitizeXSS.hs
@ -97,8 +97,7 @@ safeTagsCustom ::
                                          -- 'safeTagName'
  -> ((Text, Text) -> Maybe (Text, Text)) -- ^ Sanitize attributes,
                                          -- like 'sanitizeAttribute'
-  ->
-              [Tag Text] -> [Tag Text]
+  -> [Tag Text] -> [Tag Text]
 safeTagsCustom _ _ [] = []
 safeTagsCustom safeName sanitizeAttr (t@(TagClose name):tags)
    | safeName name = t : safeTagsCustom safeName sanitizeAttr tags