diff --git a/src/Vervis/Foundation.hs b/src/Vervis/Foundation.hs index 696d049..290b655 100644 --- a/src/Vervis/Foundation.hs +++ b/src/Vervis/Foundation.hs @@ -151,6 +151,7 @@ instance Yesod App where handler (getCurrentRoute >>= \ mr -> case mr of Nothing -> return False + Just InboxR -> return False Just (GitUploadRequestR _ _) -> return False Just r -> isWriteRequest r )