cov: Remove unreachable static icon
This commit is contained in:
committed by
Steve Chavez
parent
de8253facc
commit
7272d8894c
@@ -112,7 +112,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
|
||||||
|
|||||||
@@ -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 |
Reference in New Issue
Block a user