nek0/eidolon
1
0
Fork 0
Code Issues Pull requests Projects Releases Wiki Activity

set scheme prefix dependent on approot, not incoming connection.

Browse source
This commit is contained in:
nek0 2015-08-28 13:35:26 +02:00
parent bc63a44883
commit 325045cfec
1 changed files with 2 additions and 2 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

4
Foundation.hs
View file

@ -124,9 +124,9 @@ approotRequest master req =
Nothing -> appRoot $ appSettings master Nothing -> appRoot $ appSettings master
where where
prefix = prefix =
case isSecure req of case "https://" `T.isPrefixOf` (appRoot $ appSettings master) of
True -> "https://" True -> "https://"
False -> (fst $ breakOn ":" $ appRoot $ appSettings master) `T.append` "://" False -> "http://"
-- Please see the documentation for the Yesod typeclass. There are a number -- Please see the documentation for the Yesod typeclass. There are a number
-- of settings which can be configured by overriding methods here. -- of settings which can be configured by overriding methods here.