diff options
Diffstat (limited to 'libmu_scm')
-rw-r--r-- | libmu_scm/mailutils.scm.in | 5 |
1 files changed, 3 insertions, 2 deletions
diff --git a/libmu_scm/mailutils.scm.in b/libmu_scm/mailutils.scm.in index 0007ba0da..a75a85577 100644 --- a/libmu_scm/mailutils.scm.in +++ b/libmu_scm/mailutils.scm.in | |||
@@ -21,16 +21,17 @@ changequote([,])dnl | |||
21 | (define-module (mailutils)) | 21 | (define-module (mailutils)) |
22 | 22 | ||
23 | (let ((lib-path "LIBDIR/")) | 23 | (let ((lib-path "LIBDIR/")) |
24 | (dynamic-link (string-append lib-path "libmailbox")) | ||
24 | (cond | 25 | (cond |
25 | ((or (string=? (version) "1.4") | 26 | ((or (string=? (version) "1.4") |
26 | (string=? (version) "1.4.1")) | 27 | (string=? (version) "1.4.1")) |
27 | (dynamic-link (string-append lib-path "libmailbox")) | ||
28 | (dynamic-call "mu_scm_init" | 28 | (dynamic-call "mu_scm_init" |
29 | (dynamic-link (string-append | 29 | (dynamic-link (string-append |
30 | lib-path | 30 | lib-path |
31 | "libguile-mailutils-v-VERSION")))) | 31 | "libguile-mailutils-v-VERSION")))) |
32 | (else | 32 | (else |
33 | (load-extension "libguile-mailutils-v-VERSION" "mu_scm_init")))) | 33 | (load-extension (string-append |
34 | lib-path "libguile-mailutils-v-VERSION") "mu_scm_init")))) | ||
34 | 35 | ||
35 | (export mu-package) | 36 | (export mu-package) |
36 | (export mu-package-string) | 37 | (export mu-package-string) |