diff --git a/src/Makefile b/src/Makefile
index d6c0be5..4715e58 100644
--- a/src/Makefile
+++ b/src/Makefile
@@ -234,7 +234,8 @@ ENVIRONMENT-SOURCES=environment.scm ansi.import.scm
 environment.o: environment.import.scm
 environment.import.scm: $(ENVIRONMENT-SOURCES)
 
-MAILMAN-SOURCES=mailman.scm utils.import.scm progress.import.scm
+MAILMAN-SOURCES=mailman.scm utils.import.scm progress.import.scm	\
+	util-set-list.scm
 
 mailman.o: mailman.import.scm
 mailman.import.scm: $(MAILMAN-SOURCES)
diff --git a/src/mailman.scm b/src/mailman.scm
index 6ac4713..009e8df 100644
--- a/src/mailman.scm
+++ b/src/mailman.scm
@@ -46,7 +46,8 @@
 	 (chicken sort)
 	 (chicken format)
 	 utils
-	 progress)
+	 progress
+	 util-set-list)
 
  ;; Where does the mailman binaries reside
  (define *mailman-bin* (make-parameter "/usr/lib/mailman/bin"))
@@ -117,7 +118,8 @@
 
  ;; Returns #t if the email is in given ml
  (define (email-in-mailman-list? ml email)
-   (if (member email (mailman-list-members ml))
+   (if (lset-member? (list->lset (mailman-list-members ml) string-ci=?)
+		     email)
        #t
        #f))