diff options
-rw-r--r-- | nar-herder/recent-changes.scm | 8 |
1 files changed, 5 insertions, 3 deletions
diff --git a/nar-herder/recent-changes.scm b/nar-herder/recent-changes.scm index 3b53d18..ccfff93 100644 --- a/nar-herder/recent-changes.scm +++ b/nar-herder/recent-changes.scm @@ -169,7 +169,9 @@ #:unwind? #t) (#f (loop after '())) (recent-changes - (loop (assq-ref (last recent-changes) - 'datetime) - recent-changes)))))))) + (if (null? recent-changes) + (loop after last-processed-recent-changes) + (loop (assq-ref (last recent-changes) + 'datetime) + recent-changes))))))))) |