From 787b7f060fdc08c5157214ca27b8a92e40ba2478 Mon Sep 17 00:00:00 2001
From: Yitzchak Gale <yitzg@suite-sol.com>
Date: Sun, 1 Jul 2018 14:54:41 +0300
Subject: [PATCH] Improve function layout.

---
 src/Text/HTML/SanitizeXSS.hs | 3 +--
 1 file changed, 1 insertion(+), 2 deletions(-)

diff --git a/src/Text/HTML/SanitizeXSS.hs b/src/Text/HTML/SanitizeXSS.hs
index abcc13c..f7ea173 100644
--- 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