When parsing a LocalURI, use a *valid* dummy host

The previous dummy host was "h", which doesn't contain periods, so the `FedURI`
parser rejects it.
This commit is contained in:
fr33domlover 2019-05-09 22:03:19 +00:00
parent 273fcf972f
commit 635952a797

View file

@ -147,7 +147,7 @@ data LocalURI = LocalURI
deriving Eq
dummyHost :: Text
dummyHost = "h"
dummyHost = "h.h"
dummyPrefix :: Text
dummyPrefix = "https://" <> dummyHost