summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorAdrian Cochrane <adrian@openwork.nz>2020-04-18 13:55:58 +1200
committerAdrian Cochrane <adrian@openwork.nz>2020-04-18 13:55:58 +1200
commit5116153eb6ea1dd9cae8f7aea4597207a35d1516 (patch)
tree6e096c17f179b8ad92983d7c84571defae1bfb5b
parenta0a02492181f80c4c8003814d16fe3ff7e077882 (diff)
downloadhurl-5116153eb6ea1dd9cae8f7aea4597207a35d1516.tar.gz
hurl-5116153eb6ea1dd9cae8f7aea4597207a35d1516.tar.bz2
hurl-5116153eb6ea1dd9cae8f7aea4597207a35d1516.zip
Silence encoding errors, as it's a nuisance for encoding sniffing.
TODO: This didn't make it into the previous release.
-rw-r--r--src/Network/URI/Charset.hs2
1 files changed, 1 insertions, 1 deletions
diff --git a/src/Network/URI/Charset.hs b/src/Network/URI/Charset.hs
index 1f914ee..ac1df5d 100644
--- a/src/Network/URI/Charset.hs
+++ b/src/Network/URI/Charset.hs
@@ -38,7 +38,7 @@ convertCharset "utf-32" = decodeUtf32LEWith replaceChar
convertCharset charset = -- FIXME Is this the best fallback for unsupported charsets?
trace ("Unsupported text encoding" ++ charset) $ decodeUtf8With replaceChar
-replaceChar error _ = trace error $ Just '�'
+replaceChar _ _ = Just '�'
-- | Lists all charsets supported by convertCharset
charsets :: [Text]