diff options
author | Sergey Poznyakoff <gray@gnu.org.ua> | 2003-01-10 14:41:43 +0000 |
---|---|---|
committer | Sergey Poznyakoff <gray@gnu.org.ua> | 2003-01-10 14:41:43 +0000 |
commit | a9c418a0bb36d0a8a7df9c09f4f939ab15d91afc (patch) | |
tree | 67f20e353dbbeff6e32bfdfce946aab3f6120025 | |
parent | 1e3c90eb8e2b2a35fd33573a87d86ae19a2bad71 (diff) | |
download | mailutils-a9c418a0bb36d0a8a7df9c09f4f939ab15d91afc.tar.gz mailutils-a9c418a0bb36d0a8a7df9c09f4f939ab15d91afc.tar.bz2 |
Explicitly load libmailbox before loading libmu_scm. Fixed 1.6 branch of the conditional.
-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 (define-module (mailutils)) (let ((lib-path "LIBDIR/")) + (dynamic-link (string-append lib-path "libmailbox")) (cond ((or (string=? (version) "1.4") (string=? (version) "1.4.1")) - (dynamic-link (string-append lib-path "libmailbox")) (dynamic-call "mu_scm_init" (dynamic-link (string-append lib-path "libguile-mailutils-v-VERSION")))) (else - (load-extension "libguile-mailutils-v-VERSION" "mu_scm_init")))) + (load-extension (string-append + lib-path "libguile-mailutils-v-VERSION") "mu_scm_init")))) (export mu-package) (export mu-package-string) |