diff options
author | Christopher Baines <mail@cbaines.net> | 2022-11-18 10:48:59 +0000 |
---|---|---|
committer | Christopher Baines <mail@cbaines.net> | 2022-11-18 10:48:59 +0000 |
commit | 2b00c7071b58ab2ec348b5020d9a1840df53d90f (patch) | |
tree | 3a59e0be77e0653d43079ba81c2745928103a4c2 | |
parent | fa1191184a46bc7d150c8d5a9249cb72f1c5eef8 (diff) | |
download | qa-frontpage-2b00c7071b58ab2ec348b5020d9a1840df53d90f.tar qa-frontpage-2b00c7071b58ab2ec348b5020d9a1840df53d90f.tar.gz |
Stop logging so much about cache misses
-rw-r--r-- | guix-qa-frontpage/database.scm | 4 |
1 files changed, 3 insertions, 1 deletions
diff --git a/guix-qa-frontpage/database.scm b/guix-qa-frontpage/database.scm index ea9ad96..2ff3107 100644 --- a/guix-qa-frontpage/database.scm +++ b/guix-qa-frontpage/database.scm @@ -375,7 +375,9 @@ SELECT data, timestamp FROM cache WHERE key = :key AND version = :version" 'noval (call-with-input-string data read)))))))))) - (when (eq? cached-values 'noval) + ;; Don't log cache misses for now + (when (and #f + (eq? cached-values 'noval)) (simple-format (current-error-port) "cache miss: ~A\n" string-key)) |