mirror of https://github.com/djcb/mu.git
* mu-guile-msg.c: use mu: namespace for values
This commit is contained in:
parent
2f556738e8
commit
9a6c96c202
|
@ -181,9 +181,9 @@ SCM_DEFINE (msg_prio, "mu:msg:priority", 1, 0, 0,
|
||||||
prio = mu_msg_get_prio (msgwrap->_msg);
|
prio = mu_msg_get_prio (msgwrap->_msg);
|
||||||
|
|
||||||
switch (prio) {
|
switch (prio) {
|
||||||
case MU_MSG_PRIO_LOW: return scm_from_locale_symbol("low");
|
case MU_MSG_PRIO_LOW: return scm_from_locale_symbol("mu:low");
|
||||||
case MU_MSG_PRIO_NORMAL: return scm_from_locale_symbol("normal");
|
case MU_MSG_PRIO_NORMAL: return scm_from_locale_symbol("mu:normal");
|
||||||
case MU_MSG_PRIO_HIGH: return scm_from_locale_symbol("high");
|
case MU_MSG_PRIO_HIGH: return scm_from_locale_symbol("mu:high");
|
||||||
default:
|
default:
|
||||||
g_return_val_if_reached (SCM_UNDEFINED);
|
g_return_val_if_reached (SCM_UNDEFINED);
|
||||||
}
|
}
|
||||||
|
@ -202,7 +202,12 @@ check_flag (MuMsgFlags flag, FlagData *fdata)
|
||||||
{
|
{
|
||||||
if (fdata->flags & flag) {
|
if (fdata->flags & flag) {
|
||||||
SCM item;
|
SCM item;
|
||||||
item = scm_list_1 (scm_from_locale_symbol(mu_msg_flag_name(flag)));
|
char *flagsym;
|
||||||
|
|
||||||
|
flagsym = g_strconcat ("mu:", mu_msg_flag_name(flag), NULL);
|
||||||
|
item = scm_list_1 (scm_from_locale_symbol(flagsym));
|
||||||
|
g_free (flagsym);
|
||||||
|
|
||||||
fdata->lst = scm_append_x (scm_list_2(fdata->lst, item));
|
fdata->lst = scm_append_x (scm_list_2(fdata->lst, item));
|
||||||
}
|
}
|
||||||
}
|
}
|
||||||
|
|
Loading…
Reference in New Issue