aboutsummaryrefslogtreecommitdiff
path: root/nar-herder/mirror.scm
diff options
context:
space:
mode:
authorChristopher Baines <mail@cbaines.net>2021-12-15 00:41:31 +0000
committerChristopher Baines <mail@cbaines.net>2021-12-15 00:41:31 +0000
commit18fcfc638cc95ed25ce06ca4670be5fb7c71cc6d (patch)
tree900ecf4411d1b8ab6d5ea22554a89f07254f0b44 /nar-herder/mirror.scm
parent631f9466cd91708c3b738e3cfb85be9f909cbbd0 (diff)
downloadnar-herder-18fcfc638cc95ed25ce06ca4670be5fb7c71cc6d.tar
nar-herder-18fcfc638cc95ed25ce06ca4670be5fb7c71cc6d.tar.gz
Fix member call in mirror module
Diffstat (limited to 'nar-herder/mirror.scm')
-rw-r--r--nar-herder/mirror.scm4
1 files changed, 2 insertions, 2 deletions
diff --git a/nar-herder/mirror.scm b/nar-herder/mirror.scm
index a38d646..cdaa50c 100644
--- a/nar-herder/mirror.scm
+++ b/nar-herder/mirror.scm
@@ -83,8 +83,8 @@
(lambda (_ change-details)
;; Guard against processing changes that have already
;; been processed
- (unless (member processed-recent-changes
- (strip-change-datetime change-details))
+ (unless (member (strip-change-datetime change-details)
+ processed-recent-changes)
(let ((change (assq-ref change-details 'change)))
(cond
((string=? change "addition")