* libmuguile: updates for some renaming elsewhere

This commit is contained in:
Dirk-Jan C. Binnema
2011-08-06 10:45:19 +03:00
parent 136555bc50
commit 46c8e79fea
2 changed files with 4 additions and 3 deletions

View File

@ -35,8 +35,6 @@ mu_guile_error (const char *func_name, int status,
scm_list_1 (scm_from_int (status)));
}
void
mu_guile_g_error (const char *func_name, GError *err)
{

View File

@ -89,6 +89,7 @@ SCM_DEFINE (msg_move, "mu:msg:move-to-maildir", 2, 0, 0,
GError *err;
MuMsgWrapper *msgwrap;
gboolean rv;
MuMsgFlags flags;
SCM_ASSERT (mu_guile_scm_is_msg(MSG), MSG, SCM_ARG1, FUNC_NAME);
SCM_ASSERT (scm_is_string (TARGETMDIR), TARGETMDIR, SCM_ARG2, FUNC_NAME);
@ -96,8 +97,10 @@ SCM_DEFINE (msg_move, "mu:msg:move-to-maildir", 2, 0, 0,
msgwrap = (MuMsgWrapper*) SCM_CDR(MSG);
err = NULL;
flags = mu_msg_get_flags (msgwrap->_msg);
rv = mu_msg_move_to_maildir (msgwrap->_msg,
scm_to_utf8_string (TARGETMDIR), &err);
scm_to_utf8_string (TARGETMDIR), flags,
&err);
if (!rv && err) {
mu_guile_g_error (FUNC_NAME, err);
g_error_free (err);