diff --git a/src/Vervis/Handler/Inbox.hs b/src/Vervis/Handler/Inbox.hs
index 3ab0e9f..c67e4e6 100644
--- a/src/Vervis/Handler/Inbox.hs
+++ b/src/Vervis/Handler/Inbox.hs
@@ -150,7 +150,7 @@ getSharerInboxR shr = do
         getPageAndNavCount
             (countItems pid)
             (\ off lim -> map adaptItem <$> getItems pid off lim)
-    let here = OutboxR shr
+    let here = SharerInboxR shr
     encodeRouteLocal <- getEncodeRouteLocal
     encodeRoutePageLocal <- getEncodeRoutePageLocal
     let pageUrl = encodeRoutePageLocal here