diff options
author | Christopher Baines <mail@cbaines.net> | 2023-07-08 09:55:41 +0100 |
---|---|---|
committer | Christopher Baines <mail@cbaines.net> | 2023-07-08 09:55:41 +0100 |
commit | 374c8de2646372a0207b2a30248443d41509a6b5 (patch) | |
tree | 26ccc97d2d557368e72223af2a692e77ffaee787 | |
parent | 1145a806e7c8780c28ee06e88c2c2e5043844191 (diff) | |
download | nar-herder-374c8de2646372a0207b2a30248443d41509a6b5.tar nar-herder-374c8de2646372a0207b2a30248443d41509a6b5.tar.gz |
Log just before querying for recent changes
-rw-r--r-- | nar-herder/mirror.scm | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/nar-herder/mirror.scm b/nar-herder/mirror.scm index cb47d65..c889af7 100644 --- a/nar-herder/mirror.scm +++ b/nar-herder/mirror.scm @@ -75,6 +75,8 @@ (lambda () (retry-on-error (lambda () + (log-msg 'INFO "querying for recent changes since " + latest-recent-change) (with-port-timeouts (lambda () (let ((port @@ -94,8 +96,6 @@ (recent-changes (assoc-ref json-body "recent_changes"))) - (log-msg 'INFO "queried for recent changes since " - latest-recent-change) (log-msg 'INFO "got " (vector-length recent-changes) " changes") ;; Switch to symbol keys and standardise the key order |