The MIMEParams parser should consider an omitted charset to be an error.

diff --git a/Network/HTTP/Lucu/MIMEParams.hs b/Network/HTTP/Lucu/MIMEParams.hs
index 9c39236679feea13cabaaa94edd346684be9a810..9e5b938b384f4b3e24157a8ead92e24fb94041a1 100644 (file)
--- a/Network/HTTP/Lucu/MIMEParams.hs
+++ b/Network/HTTP/Lucu/MIMEParams.hs
@@ -184,8 +184,7 @@ initialEncodedValue
              -- NOTE: I'm not sure this is the right thing, but RFC
              -- 2231 doesn't tell us what we should do when the
              -- charset is omitted.
-             return ("US-ASCII", payload)
-             -- FIXME: Rethink about this behaviour.
+             fail "charset is missing"
          else
              return (charset, payload)
     where