Fix redirection bug in SharerInboxR

This commit is contained in:
fr33domlover 2019-05-25 20:24:13 +00:00
parent bf9199b466
commit 9689e9d471

View file

@ -150,7 +150,7 @@ getSharerInboxR shr = do
getPageAndNavCount getPageAndNavCount
(countItems pid) (countItems pid)
(\ off lim -> map adaptItem <$> getItems pid off lim) (\ off lim -> map adaptItem <$> getItems pid off lim)
let here = OutboxR shr let here = SharerInboxR shr
encodeRouteLocal <- getEncodeRouteLocal encodeRouteLocal <- getEncodeRouteLocal
encodeRoutePageLocal <- getEncodeRoutePageLocal encodeRoutePageLocal <- getEncodeRoutePageLocal
let pageUrl = encodeRoutePageLocal here let pageUrl = encodeRoutePageLocal here