mirror of https://github.com/djcb/mu.git
* mu-guile-message.c: fix small leak
This commit is contained in:
parent
4a2e813e4f
commit
d448003c09
|
@ -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,
|
iter = get_query_iter (mu_guile_instance()->query, expr,
|
||||||
scm_to_int(MAXNUM));
|
scm_to_int(MAXNUM));
|
||||||
free (expr);
|
free (expr);
|
||||||
|
|
||||||
if (!iter)
|
if (!iter)
|
||||||
return SCM_UNSPECIFIED;
|
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_next (iter);
|
||||||
}
|
}
|
||||||
|
|
||||||
|
mu_msg_iter_destroy (iter);
|
||||||
|
|
||||||
return SCM_UNSPECIFIED;
|
return SCM_UNSPECIFIED;
|
||||||
}
|
}
|
||||||
#undef FUNC_NAME
|
#undef FUNC_NAME
|
||||||
|
|
Loading…
Reference in New Issue