From cf0197fb463a5e1235bee1e4bab07cec0d15097b Mon Sep 17 00:00:00 2001 From: Gregor Kleen Date: Thu, 16 Mar 2017 16:17:50 +0100 Subject: Guess approot --- Foundation.hs | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) (limited to 'Foundation.hs') diff --git a/Foundation.hs b/Foundation.hs index d7425d5..166b83c 100644 --- a/Foundation.hs +++ b/Foundation.hs @@ -52,7 +52,7 @@ type Form x = Html -> MForm (HandlerT App IO) (FormResult x, Widget) -- Please see the documentation for the Yesod typeclass. There are a number -- of settings which can be configured by overriding methods here. instance Yesod App where - approot = ApprootRequest $ \_ req -> maybe "" (TE.decodeUtf8With TEE.lenientDecode) $ Map.lookup "AppRoot" (Map.fromList $ requestHeaders req) + approot = guessApproot -- Store session data on the client in encrypted cookies, -- default session idle timeout is 120 minutes -- cgit v1.2.3