* mu-guile-message.c: fix small leak

2012-12-23 15:23:54 +02:00
parent 4a2e813e4f
commit d448003c09
1 changed files with 2 additions and 1 deletions
--- 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