cov: Remove unreachable static icon

This commit is contained in:
Wolfgang Walther
2022-01-05 11:01:54 +01:00
committed by Wolfgang Walther
parent b0a0c4768d
commit cde9cd4ab7
3 changed files with 0 additions and 3 deletions
-1
View File
@@ -114,7 +114,6 @@ library
, wai-cors >= 0.2.5 && < 0.3 , wai-cors >= 0.2.5 && < 0.3
, wai-extra >= 3.0.19 && < 3.2 , wai-extra >= 3.0.19 && < 3.2
, wai-logger >= 2.3.2 , wai-logger >= 2.3.2
, wai-middleware-static >= 0.8.1 && < 0.10
, warp >= 3.2.12 && < 3.4 , warp >= 3.2.12 && < 3.4
-- -fno-spec-constr may help keep compile time memory use in check, -- -fno-spec-constr may help keep compile time memory use in check,
-- see https://gitlab.haskell.org/ghc/ghc/issues/16017#note_219304 -- see https://gitlab.haskell.org/ghc/ghc/issues/16017#note_219304
-2
View File
@@ -28,7 +28,6 @@ import qualified Network.Wai.Logger as Wai
import qualified Network.Wai.Middleware.Cors as Wai import qualified Network.Wai.Middleware.Cors as Wai
import qualified Network.Wai.Middleware.Gzip as Wai import qualified Network.Wai.Middleware.Gzip as Wai
import qualified Network.Wai.Middleware.RequestLogger as Wai import qualified Network.Wai.Middleware.RequestLogger as Wai
import qualified Network.Wai.Middleware.Static as Wai
import Control.Arrow ((***)) import Control.Arrow ((***))
@@ -129,7 +128,6 @@ pgrstMiddleware :: LogLevel -> Wai.Application -> Wai.Application
pgrstMiddleware logLevel = pgrstMiddleware logLevel =
logger logger
. Wai.cors corsPolicy . Wai.cors corsPolicy
. Wai.staticPolicy (Wai.only [("favicon.ico", "static/favicon.ico")])
where where
logger = case logLevel of logger = case logLevel of
LogCrit -> id LogCrit -> id
Binary file not shown.

Before

Width:  |  Height:  |  Size: 4.2 KiB