Export mu-mailer guile variable
* libmu_scm/mu_scm.c: Export mu-mailer. * libmu_scm/mu_message.c (scm_mu_message_send): Fix a typo.
Showing
2 changed files
with
4 additions
and
2 deletions
... | @@ -1068,7 +1068,7 @@ SCM_DEFINE_PUBLIC (scm_mu_message_send, "mu-message-send", 1, 3, 0, | ... | @@ -1068,7 +1068,7 @@ SCM_DEFINE_PUBLIC (scm_mu_message_send, "mu-message-send", 1, 3, 0, |
1068 | status = mu_mailer_create (&mailer_c, mailer_name); | 1068 | status = mu_mailer_create (&mailer_c, mailer_name); |
1069 | free (mailer_name); | 1069 | free (mailer_name); |
1070 | if (status) | 1070 | if (status) |
1071 | mu_scm_error (FUNC_NAME, status, "Cannot get create mailer", SCM_BOOL_F); | 1071 | mu_scm_error (FUNC_NAME, status, "Cannot create mailer", SCM_BOOL_F); |
1072 | 1072 | ||
1073 | if (scm_to_int (MU_SCM_SYMBOL_VALUE ("mu-debug"))) | 1073 | if (scm_to_int (MU_SCM_SYMBOL_VALUE ("mu-debug"))) |
1074 | { | 1074 | { | ... | ... |
... | @@ -175,9 +175,11 @@ mu_scm_init () | ... | @@ -175,9 +175,11 @@ mu_scm_init () |
175 | 175 | ||
176 | _mu_scm_mailer = scm_from_locale_string ("sendmail:" PATH_SENDMAIL); | 176 | _mu_scm_mailer = scm_from_locale_string ("sendmail:" PATH_SENDMAIL); |
177 | scm_c_define ("mu-mailer", _mu_scm_mailer); | 177 | scm_c_define ("mu-mailer", _mu_scm_mailer); |
178 | 178 | scm_c_export ("mu-mailer", NULL); | |
179 | |||
179 | _mu_scm_debug = scm_from_int (0); | 180 | _mu_scm_debug = scm_from_int (0); |
180 | scm_c_define ("mu-debug", _mu_scm_debug); | 181 | scm_c_define ("mu-debug", _mu_scm_debug); |
182 | scm_c_export ("mu-debug", NULL); | ||
181 | 183 | ||
182 | _mu_scm_package = scm_from_locale_string (PACKAGE); | 184 | _mu_scm_package = scm_from_locale_string (PACKAGE); |
183 | scm_c_define ("mu-package", _mu_scm_package); | 185 | scm_c_define ("mu-package", _mu_scm_package); | ... | ... |
-
Please register or sign in to post a comment