sup39/vervis
1
0
Fork 0
mirror of https://code.sup39.dev/repos/Wqawg synced 2024-12-29 15:54:51 +09:00
Code Issues Activity

Fix bug in FedURI parsing

Browse source
This commit is contained in:
fr33domlover 2019-03-04 20:11:58 +00:00
parent bb662e798f
commit 378ca1b3d4
1 changed files with 1 additions and 1 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

2
src/Network/FedURI.hs
View file

@ -95,7 +95,7 @@ parseFedURI t = do
else Left "URI query is non-empty" else Left "URI query is non-empty"
Right FedURI Right FedURI
{ furiHost = T.pack h { furiHost = T.pack h
, furiPath = T.pack p , furiPath = T.pack $ uriPath uri
, furiFragment = T.pack $ uriFragment uri , furiFragment = T.pack $ uriFragment uri
} }