X-Git-Url: http://gitweb.michael.orlitzky.com/?p=dead%2Fhalcyon.git;a=blobdiff_plain;f=src%2FHtml.hs;h=f1671a8e57f0fb0401ec7cea8ec5d765a42a6ba3;hp=01004cf556b01f3dde21fd8b9585b82732c5b009;hb=d7c6b5499c0969b6e488d9fc583f93bbb4e3d4c7;hpb=eed0d7b0f8ef28864c00925beef5c8853bcd44cc diff --git a/src/Html.hs b/src/Html.hs index 01004cf..f1671a8 100644 --- a/src/Html.hs +++ b/src/Html.hs @@ -1,13 +1,12 @@ module Html ( html_tests, - replace_entities - ) + replace_entities ) where -import Test.Framework (Test, testGroup) -import Test.Framework.Providers.HUnit (testCase) -import Test.HUnit (Assertion, assertEqual) -import Text.HTML.TagSoup.Entity (lookupEntity) +import Test.Framework ( Test, testGroup ) +import Test.Framework.Providers.HUnit ( testCase ) +import Test.HUnit ( Assertion, assertEqual ) +import Text.HTML.TagSoup.Entity ( lookupEntity ) replace_entities :: String -> String replace_entities [] = []