diff --git a/src/members-payments.scm b/src/members-payments.scm
index 4601882..e73c7e6 100644
--- a/src/members-payments.scm
+++ b/src/members-payments.scm
@@ -236,6 +236,6 @@
    (find-members-by-predicate
     mb
     (lambda (mr)
-      (member-to-notify? mb months))))
+      (member-to-notify? mr months))))
 
  )
diff --git a/src/notifications.scm b/src/notifications.scm
index 44f059e..2199e2f 100644
--- a/src/notifications.scm
+++ b/src/notifications.scm
@@ -169,7 +169,11 @@
 		 #:border-style 'ascii
 		 #:col-border #t
 		 #:row0-border #t))))
-	  (boring (find-members-by-predicate mb (compose not member-to-notify?)))
+	  (boring (find-members-by-predicate
+		   mb
+		   (lambda (mr)
+		     (and (brmember-active? mr)
+			  (not (member-to-notify? mr))))))
 	  (boring-lst
 	   (if (null? boring)
 	       '()