summaryrefslogtreecommitdiff
path: root/guile/modules
diff options
context:
space:
mode:
Diffstat (limited to 'guile/modules')
-rw-r--r--guile/modules/gnutls.in13
1 files changed, 7 insertions, 6 deletions
diff --git a/guile/modules/gnutls.in b/guile/modules/gnutls.in
index b4825226fd..f35f6eae29 100644
--- a/guile/modules/gnutls.in
+++ b/guile/modules/gnutls.in
@@ -1,5 +1,5 @@
;;; GnuTLS --- Guile bindings for GnuTLS.
-;;; Copyright (C) 2007-2012, 2014 Free Software Foundation, Inc.
+;;; Copyright (C) 2007-2012, 2014, 2015 Free Software Foundation, Inc.
;;;
;;; GnuTLS is free software; you can redistribute it and/or
;;; modify it under the terms of the GNU Lesser General Public
@@ -412,12 +412,13 @@
openpgp-certificate-format/raw
openpgp-certificate-format/base64))
-(define %libdir
- (or (getenv "GNUTLS_GUILE_EXTENSION_DIR")
- "@guileextensiondir@"))
+(eval-when (expand load eval)
+ (define %libdir
+ (or (getenv "GNUTLS_GUILE_EXTENSION_DIR")
+ "@guileextensiondir@"))
-(load-extension (string-append %libdir "/guile-gnutls-v-2")
- "scm_init_gnutls")
+ (load-extension (string-append %libdir "/guile-gnutls-v-2")
+ "scm_init_gnutls"))
;; Renaming.
(define protocol/ssl-3 protocol/ssl3)