03/03: gnu: guile-bytestructures: Install .go files to lib/guile/X.Y.

[Ludovic Courtès]

civodul pushed a commit to branch master
in repository guix.

commit f0732ee48586c3be84e4b9edba94740e123fec4d
Author: Ludovic Courtès <address@hidden>
Date:   Mon Jul 31 17:36:24 2017 +0200

    gnu: guile-bytestructures: Install .go files to lib/guile/X.Y.
    
    * gnu/packages/guile.scm (guile-bytestructures)[arguments]: Install .go
    files to OBJECT-DIR, defined as OUT/lib/guile/X.Y/site-ccache.
---
 gnu/packages/guile.scm | 4 +++-
 1 file changed, 3 insertions(+), 1 deletion(-)

diff --git a/gnu/packages/guile.scm b/gnu/packages/guile.scm
index 376cdee..3fd3f89 100644
--- a/gnu/packages/guile.scm
+++ b/gnu/packages/guile.scm
@@ -1573,6 +1573,8 @@ is no support for parsing block and inline level HTML.")
                                         "-c" "(display (effective-version))")))
                 (module-dir (string-append out "/share/guile/site/"
                                            effective))
+                (object-dir (string-append out "/lib/guile/" effective
+                                           "/site-ccache"))
                 (source (getcwd))
                 (doc (string-append out "/share/doc/scheme-bytestructures"))
                 (sld-files (with-directory-excursion source
@@ -1592,7 +1594,7 @@ is no support for parsing block and inline level HTML.")
            (for-each (lambda (file)
                        (let* ((dest-file (string-append module-dir "/"
                                                         file))
-                              (go-file (string-append module-dir "/"
+                              (go-file (string-append object-dir "/"
                                                       (substring file 0
                                                                  
(string-rindex file #\.))
                                                       ".go")))