Skip to content

Commit 4c7a8a1

Browse files
fixup! chore(deps): update nixpkgs, stackage and hackage pins
1 parent 1b3cd1e commit 4c7a8a1

1 file changed

Lines changed: 3 additions & 3 deletions

File tree

src/PostgREST/App.hs

Lines changed: 3 additions & 3 deletions
Original file line numberDiff line numberDiff line change
@@ -68,7 +68,7 @@ import qualified Data.List as L
6868
import Data.Streaming.Network (bindPortTCP)
6969
import qualified Data.Text as T
7070
import qualified Network.HTTP.Types as HTTP
71-
import qualified Network.HTTP.Types.Header as HTTP (hVary)
71+
import Network.HTTP.Types.Header (hVary)
7272
import qualified Network.Socket as NS
7373
import PostgREST.Unix (createAndBindDomainSocket)
7474
import Protolude hiding (Handler)
@@ -223,10 +223,10 @@ postgrestResponse appState conf@AppConfig{..} maybeSchemaCache jwtTime authResul
223223
serverTimingHeaders timing = [serverTimingHeader timing | configServerTimingEnabled]
224224

225225
varyHeader :: HTTP.Header
226-
varyHeader = (HTTP.hVary, "Accept, Prefer, Range")
226+
varyHeader = (hVary, "Accept, Prefer, Range")
227227

228228
varyHeaderPresent :: [HTTP.Header] -> Bool
229-
varyHeaderPresent = any (\(h, _v) -> h == HTTP.hVary)
229+
varyHeaderPresent = any (\(h, _v) -> h == hVary)
230230

231231
withTiming :: (MonadError e m, MonadIO m) => AppConfig -> m a -> m (Maybe Double, a)
232232
withTiming AppConfig{configServerTimingEnabled} f = if configServerTimingEnabled

0 commit comments

Comments
 (0)