From 69284e3af446fb743a4250176ee0f2ea952d0822 Mon Sep 17 00:00:00 2001 From: Filip Gralinski Date: Tue, 16 Feb 2016 09:58:58 +0100 Subject: [PATCH] querying without logging --- Foundation.hs | 2 ++ 1 file changed, 2 insertions(+) diff --git a/Foundation.hs b/Foundation.hs index 2631f7f..44cf92b 100644 --- a/Foundation.hs +++ b/Foundation.hs @@ -105,6 +105,8 @@ instance Yesod App where isAuthorized FaviconR _ = return Authorized isAuthorized RobotsR _ = return Authorized isAuthorized HomeR _ = return Authorized + isAuthorized QueryFormR _ = return Authorized + isAuthorized (QueryResultsR _) _ = return Authorized -- Default to Authorized for now. isAuthorized _ _ = isTrustedAuthorized