Skip to content
Snippets Groups Projects
Commit ec86ddcd authored by Gershom Bazerman's avatar Gershom Bazerman Committed by Hécate Moonlight
Browse files

cleanup and document a global repo flag

parent dcfdc9cf
No related branches found
No related tags found
No related merge requests found
......@@ -201,10 +201,10 @@ updateRepo verbosity _updateFlags repoCtxt (repo, indexState) = do
writeIndexTimestamp index indexState
-- typically we get the current time to check expiry against
-- but if the flag is set, we don't.
now <- case repoContextIgnoreExpiry repoCtxt of
now' <- case repoContextIgnoreExpiry repoCtxt of
False -> Just <$> getCurrentTime
True -> pure Nothing
updated <- Sec.uncheckClientErrors $ Sec.checkForUpdates repoSecure now
updated <- Sec.uncheckClientErrors $ Sec.checkForUpdates repoSecure now'
-- this resolves indexState (which could be HEAD) into a timestamp
new_ts <- currentIndexTimestamp (lessVerbose verbosity) repoCtxt repo
let rname = remoteRepoName (repoRemote repo)
......
0% Loading or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment