fix build with old versions of warp
This commit is contained in:
parent
ee63c59644
commit
b7560e660e
1 changed files with 8 additions and 1 deletions
|
@ -97,7 +97,14 @@ fixSockAddr addr = addr
|
||||||
|
|
||||||
-- disable buggy sloworis attack prevention code
|
-- disable buggy sloworis attack prevention code
|
||||||
webAppSettings :: Settings
|
webAppSettings :: Settings
|
||||||
webAppSettings = setTimeout (30 * 60) defaultSettings
|
|
||||||
|
#if MIN_VERSION_warp(2,1,0)
|
||||||
|
webAppSettings = setTimeout halfhour defaultSettings
|
||||||
|
#else
|
||||||
|
webAppSettings = defaultSettings { settingsTimeout = halfhour }
|
||||||
|
#endif
|
||||||
|
where
|
||||||
|
halfhour = 30 * 60
|
||||||
|
|
||||||
{- Binds to a local socket, or if specified, to a socket on the specified
|
{- Binds to a local socket, or if specified, to a socket on the specified
|
||||||
- hostname or address. Selects any free port, unless the hostname ends with
|
- hostname or address. Selects any free port, unless the hostname ends with
|
||||||
|
|
Loading…
Add table
Add a link
Reference in a new issue