Make logs a little quieter

This commit is contained in:
Bryan Richter 2025-03-18 14:00:59 +02:00
parent 0205d03302
commit 9523039dee
No known key found for this signature in database
GPG Key ID: B202264020068BFB

View File

@ -554,7 +554,7 @@ decideOnSnapshotUpdate SnapshotFileInfo {sfiSnapName, sfiUpdatedOn, sfiSnapshotF
Nothing -> maybe NoSnapshotFile DoesntExist <$> sfiSnapshotFileGetter
-- Add new snapshot to the database, when necessary
case mKeySnapFile of
NothingToDo -> Nothing <$ logInfo (mkLogMsg "already exists and is up to date.")
NothingToDo -> Nothing <$ logDebug (mkLogMsg "already exists and is up to date.")
NoSnapshotFile -> Nothing <$ logWarn (mkLogMsg "has no (readable?) snapshot file.")
NeedsUpdate (Entity oldSnapKey oldSnap) sf@SnapshotFile {sfCompiler, sfPublishDate}
| Just publishDate <- sfPublishDate -> do