Browse files

remove comment

  • Loading branch information...
1 parent c9765da commit 5dbc1428a8cf917df6f6f6fef8c649152af221d5 @gregwebs committed Sep 25, 2010
Showing with 1 addition and 1 deletion.
  1. +1 −1 Text/HTML/SanitizeXSS.hs
View
2 Text/HTML/SanitizeXSS.hs
@@ -12,7 +12,7 @@ import Codec.Binary.UTF8.String ( encodeString, decodeString )
sanitizeXSS :: String -> String
sanitizeXSS = renderTagsOptions renderOptions {
optMinimize = \x -> x `elem` ["br","img"]
- } . safeTags . parseTags -- Options parseOptions { optTagPosition = True }
+ } . safeTags . parseTags
where
safeTags :: [Tag String] -> [Tag String]
safeTags [] = []

0 comments on commit 5dbc142

Please sign in to comment.