summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorstuebinm2022-04-05 23:23:49 +0200
committerstuebinm2022-04-05 23:23:49 +0200
commitd3dcb5f4a787657f15799744c74f9a84baf1057b (patch)
tree1eb5410fd76d12cb872d052e76731e72c5d578e9
parent52d38a0cc3d30aac2cf22fec3644cf17f908d0b8 (diff)
linter: whitespace confusing can be
-rw-r--r--lib/Uris.hs2
1 files changed, 1 insertions, 1 deletions
diff --git a/lib/Uris.hs b/lib/Uris.hs
index 40ea43e..127b7f1 100644
--- a/lib/Uris.hs
+++ b/lib/Uris.hs
@@ -42,7 +42,7 @@ type SchemaSet = Map Text [Substitution]
-- and a normalised version of the same URI
parseUri :: Text -> Maybe (Text, Text, Text, Text)
parseUri raw =
- case parseURI (toString raw) of
+ case parseURI (toString (T.strip raw)) of
Nothing -> Nothing
Just uri@URI{..} -> case uriAuthority of
Nothing -> Nothing