From d3dcb5f4a787657f15799744c74f9a84baf1057b Mon Sep 17 00:00:00 2001
From: stuebinm <stuebinm@disroot.org>
Date: Tue, 5 Apr 2022 23:23:49 +0200
Subject: [PATCH] linter: whitespace confusing can be
---
lib/Uris.hs | 2 +-
1 file changed, 1 insertion(+), 1 deletion(-)
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
--
GitLab