diff --git a/src/hackerbase.scm b/src/hackerbase.scm
index f8c9351..7be60d1 100644
--- a/src/hackerbase.scm
+++ b/src/hackerbase.scm
@@ -394,7 +394,7 @@
 				(mbase-active-emails MB #:suspended #t))
 	  (mailman-sync-members (find-mailman-list MLS "rada")
 				(mbase-active-emails MB
-						     #:pred rada-ml-pred?)))
+						     #:pred? rada-ml-pred?)))
 	 (else
 	  (print "Mailman synchronization disabled with manually specified current month."))))
   ((notify)