From 6c186355f395762ebe7a32192a81b32b1a3e6e5f Mon Sep 17 00:00:00 2001 From: fr33domlover Date: Fri, 22 Mar 2019 05:17:58 +0000 Subject: [PATCH] Change some top-level routes' breadcrumbs to be under HomeR --- src/Vervis/Foundation.hs | 6 +++--- 1 file changed, 3 insertions(+), 3 deletions(-) diff --git a/src/Vervis/Foundation.hs b/src/Vervis/Foundation.hs index 688949a..a806063 100644 --- a/src/Vervis/Foundation.hs +++ b/src/Vervis/Foundation.hs @@ -766,8 +766,8 @@ instance YesodBreadcrumbs App where RobotsR -> ("", Nothing) PublishR -> ("Publish", Just HomeR) - InboxR -> ("Inbox", Nothing) - OutboxR -> ("Outbox", Nothing) + InboxR -> ("Inbox", Just HomeR) + OutboxR -> ("Outbox", Just HomeR) ActorKey1R -> ("Actor Key 1", Nothing) ActorKey2R -> ("Actor Key 2", Nothing) @@ -775,7 +775,7 @@ instance YesodBreadcrumbs App where ResendVerifyEmailR -> ( "Resend verification email" , Nothing ) - AuthR _ -> ("Auth", Nothing) + AuthR _ -> ("Auth", Just HomeR) SharersR -> ("Sharers", Just HomeR) SharerR shar -> (shr2text shar, Just SharersR)