haskell/stackage-server
1
0
Fork 0
mirror of https://github.com/commercialhaskell/stackage-server.git synced 2026-01-19 15:41:56 +01:00
Code Issues Actions Packages Projects Releases Wiki Activity

Force SSL after metrics middleware (not before)

Browse Source
This commit is contained in:
Tim Dysinger 2016-06-16 16:12:53 -07:00
parent b945ad449c
commit d282ade792
No known key found for this signature in database
GPG Key ID: 155E7413C156F68B
1 changed files with 2 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

4
Application.hs
View File

@ -75,8 +75,8 @@ makeApplication foundation = do
-- Create the WAI application and apply middlewares -- Create the WAI application and apply middlewares
appPlain <- toWaiAppPlain foundation appPlain <- toWaiAppPlain foundation
let middleware = forceSSL' (appSettings foundation) let middleware = prometheus def
. prometheus def . forceSSL' (appSettings foundation)
. logWare . logWare
. defaultMiddlewaresNoLogging . defaultMiddlewaresNoLogging