diff --git a/guile/mu-guile-message.c b/guile/mu-guile-message.c
index 37e53c4d..2aafdcc3 100644
--- a/guile/mu-guile-message.c
+++ b/guile/mu-guile-message.c
@@ -473,7 +473,6 @@ SCM_DEFINE (for_each_message, "mu:c:for-each-message", 3, 0, 0,
 	iter = get_query_iter (mu_guile_instance()->query, expr,
 			       scm_to_int(MAXNUM));
 	free (expr);
-
 	if (!iter)
 		return SCM_UNSPECIFIED;
 
@@ -482,6 +481,8 @@ SCM_DEFINE (for_each_message, "mu:c:for-each-message", 3, 0, 0,
 		mu_msg_iter_next (iter);
 	}
 
+	mu_msg_iter_destroy (iter);
+
 	return SCM_UNSPECIFIED;
 }
 #undef FUNC_NAME