mirror of
https://code.sup39.dev/repos/Wqawg
synced 2024-12-28 09:24:50 +09:00
Fix bug in FedURI parsing
This commit is contained in:
parent
bb662e798f
commit
378ca1b3d4
1 changed files with 1 additions and 1 deletions
|
@ -95,7 +95,7 @@ parseFedURI t = do
|
|||
else Left "URI query is non-empty"
|
||||
Right FedURI
|
||||
{ furiHost = T.pack h
|
||||
, furiPath = T.pack p
|
||||
, furiPath = T.pack $ uriPath uri
|
||||
, furiFragment = T.pack $ uriFragment uri
|
||||
}
|
||||
|
||||
|
|
Loading…
Reference in a new issue