summary refs log tree commit diff
diff options
context:
space:
mode:
authorPatrick Hetu <patrick.hetu@auf.org>2016-06-08 13:18:07 -0400
committerLudovic Courtès <ludo@gnu.org>2016-06-10 15:21:26 +0200
commit9e8599a3b13d0322f8f5a7e8dfaf9f66e78139f6 (patch)
tree45399856aa0b5804be4ca3244cd435cc07125bc6
parentb92d02d9783f6a3f16fb4384dbc1c695f714154a (diff)
downloadguix-9e8599a3b13d0322f8f5a7e8dfaf9f66e78139f6.tar.gz
gnu: g-wrap: Install modules to 'site/2.0'.
* gnu/packages/guile.scm (g-wrap)[arguments]: New field.

Signed-off-by: Ludovic Courtès <ludo@gnu.org>
-rw-r--r--gnu/packages/guile.scm10
1 files changed, 10 insertions, 0 deletions
diff --git a/gnu/packages/guile.scm b/gnu/packages/guile.scm
index 74e58c44af..6f00edb06b 100644
--- a/gnu/packages/guile.scm
+++ b/gnu/packages/guile.scm
@@ -939,6 +939,16 @@ capabilities.")
        ("guile-lib" ,guile-lib)))
     (inputs
      `(("libffi" ,libffi)))
+    (arguments
+      `(#:phases
+        (modify-phases %standard-phases
+          (add-before 'configure 'pre-configure
+            (lambda* (#:key outputs #:allow-other-keys)
+              (let ((out (assoc-ref outputs "out")))
+                (substitute* (find-files "." "^Makefile.in$")
+                  (("guilemoduledir =.*guile/site" all)
+                   (string-append all "/2.0")))
+                #t))))))
     (synopsis "Generate C bindings for Guile")
     (description "G-Wrap is a tool and Guile library for generating function
 wrappers for inter-language calls.  It currently only supports generating Guile