diff options
author | stuebinm | 2022-04-05 23:23:49 +0200 |
---|---|---|
committer | stuebinm | 2022-04-05 23:23:49 +0200 |
commit | d3dcb5f4a787657f15799744c74f9a84baf1057b (patch) | |
tree | 1eb5410fd76d12cb872d052e76731e72c5d578e9 | |
parent | 52d38a0cc3d30aac2cf22fec3644cf17f908d0b8 (diff) |
linter: whitespace confusing can be
-rw-r--r-- | lib/Uris.hs | 2 |
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 |