We read every piece of feedback, and take your input very seriously.
To see all available qualifiers, see our documentation.
2 parents 1d8c647 + bf30119 commit 054b26aCopy full SHA for 054b26a
server/src-lib/Hasura/Server/SchemaUpdate.hs
@@ -150,10 +150,9 @@ schemaUpdateEventProcessor strfyNum pool logger httpManager
150
-- init schema cache built then reload
151
shouldReload (SUESuccess payload) =
152
(_epInstanceId payload /= getInstanceId instanceId)
153
- && withCacheInit (_epOccurredAt payload) cacheInit
+ && maybe True (withCacheInit $ _epOccurredAt payload) cacheInit
154
155
- withCacheInit _ Nothing = False
156
- withCacheInit occurredAt (Just initTime) = occurredAt > initTime
+ withCacheInit occurredAt initTime = occurredAt > initTime
157
158
logInfo :: Logger -> ThreadType -> Value -> IO ()
159
logInfo logger threadType val = unLogger logger $
0 commit comments