diff options
author | Sergey Poznyakoff <gray@gnu.org.ua> | 2016-12-15 12:09:51 +0200 |
---|---|---|
committer | Sergey Poznyakoff <gray@gnu.org.ua> | 2016-12-15 12:09:51 +0200 |
commit | 7c9c6b5f16940e8bf263e0eb0ee3fbc4b55d5aad (patch) | |
tree | aede260c45e1bd304cb10c48c8f22c04be7b1c85 | |
parent | 3b42a3a50217575fee4d222204f53e786eb35965 (diff) | |
download | mailutils-7c9c6b5f16940e8bf263e0eb0ee3fbc4b55d5aad.tar.gz mailutils-7c9c6b5f16940e8bf263e0eb0ee3fbc4b55d5aad.tar.bz2 |
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.
-rw-r--r-- | libmu_scm/mu_message.c | 2 | ||||
-rw-r--r-- | libmu_scm/mu_scm.c | 4 |
2 files changed, 4 insertions, 2 deletions
diff --git a/libmu_scm/mu_message.c b/libmu_scm/mu_message.c index e8bc07f40..715d5c117 100644 --- a/libmu_scm/mu_message.c +++ b/libmu_scm/mu_message.c @@ -1068,7 +1068,7 @@ SCM_DEFINE_PUBLIC (scm_mu_message_send, "mu-message-send", 1, 3, 0, status = mu_mailer_create (&mailer_c, mailer_name); free (mailer_name); if (status) - mu_scm_error (FUNC_NAME, status, "Cannot get create mailer", SCM_BOOL_F); + mu_scm_error (FUNC_NAME, status, "Cannot create mailer", SCM_BOOL_F); if (scm_to_int (MU_SCM_SYMBOL_VALUE ("mu-debug"))) { diff --git a/libmu_scm/mu_scm.c b/libmu_scm/mu_scm.c index 98b4fb14b..9b0909978 100644 --- a/libmu_scm/mu_scm.c +++ b/libmu_scm/mu_scm.c @@ -175,9 +175,11 @@ mu_scm_init () _mu_scm_mailer = scm_from_locale_string ("sendmail:" PATH_SENDMAIL); scm_c_define ("mu-mailer", _mu_scm_mailer); - + scm_c_export ("mu-mailer", NULL); + _mu_scm_debug = scm_from_int (0); scm_c_define ("mu-debug", _mu_scm_debug); + scm_c_export ("mu-debug", NULL); _mu_scm_package = scm_from_locale_string (PACKAGE); scm_c_define ("mu-package", _mu_scm_package); |