52 |
SCM _mu_scm_version; /* STRING: VERSION */ |
SCM _mu_scm_version; /* STRING: VERSION */ |
53 |
SCM _mu_scm_mailer; /* STRING: Default mailer path. */ |
SCM _mu_scm_mailer; /* STRING: Default mailer path. */ |
54 |
SCM _mu_scm_debug; /* NUM: Default debug level. */ |
SCM _mu_scm_debug; /* NUM: Default debug level. */ |
55 |
|
SCM _mu_scm_path_maildir; /* STRING: mu_path_maildir */ |
56 |
|
SCM _mu_scm_path_folder_dir;/* STRING: mu_path_folder_dir */ |
57 |
|
|
58 |
struct format_record { |
struct format_record { |
59 |
char *name; |
char *name; |
185 |
_mu_scm_package_string = scm_makfrom0str (PACKAGE_STRING); |
_mu_scm_package_string = scm_makfrom0str (PACKAGE_STRING); |
186 |
mu_set_variable ("mu-package-string", _mu_scm_package_string); |
mu_set_variable ("mu-package-string", _mu_scm_package_string); |
187 |
|
|
188 |
|
_mu_scm_path_maildir = scm_makfrom0str (mu_path_maildir); |
189 |
|
mu_set_variable ("mu-path-maildir", _mu_scm_path_maildir); |
190 |
|
|
191 |
|
_mu_scm_path_folder_dir = scm_makfrom0str (mu_path_folder_dir); |
192 |
|
mu_set_variable ("mu-path-folder-dir", _mu_scm_path_folder_dir); |
193 |
|
|
194 |
/* Create MU- attribute names */ |
/* Create MU- attribute names */ |
195 |
for (i = 0; attr_kw[i].name; i++) |
for (i = 0; attr_kw[i].name; i++) |
196 |
scm_c_define(attr_kw[i].name, SCM_MAKINUM(attr_kw[i].value)); |
scm_c_define(attr_kw[i].name, SCM_MAKINUM(attr_kw[i].value)); |