01/02: gnu: guile-gi: Install extension to sub-directory, use glib-or-gtk build system.

[guix-commits]

rekado pushed a commit to branch master
in repository guix.

commit e4ef0d7cc915c69e1775a1c879e37559c9740ea1
Author: Ricardo Wurmus <rekado@elephly.net>
AuthorDate: Tue Aug 18 13:15:55 2020 +0200

    gnu: guile-gi: Install extension to sub-directory, use glib-or-gtk build 
system.
    
    * gnu/packages/guile-xyz.scm (guile-gi)[build-system]: Use
    glib-or-gtk-build-system.
    [arguments]: Install the extension to the "extensions" sub-directory.
---
 gnu/packages/guile-xyz.scm | 7 ++++---
 1 file changed, 4 insertions(+), 3 deletions(-)

diff --git a/gnu/packages/guile-xyz.scm b/gnu/packages/guile-xyz.scm
index 4526ef2..411f11f 100644
--- a/gnu/packages/guile-xyz.scm
+++ b/gnu/packages/guile-xyz.scm
@@ -104,6 +104,7 @@
   #:use-module (guix download)
   #:use-module (guix git-download)
   #:use-module (guix hg-download)
+  #:use-module (guix build-system glib-or-gtk)
   #:use-module (guix build-system gnu)
   #:use-module (guix build-system guile)
   #:use-module (guix utils)
@@ -2706,10 +2707,10 @@ list of components.  This module takes care of that for 
you.")
               (sha256
                (base32
                 "05xbwrk50h4f9fh8la8fk2wsxbnm0jcyb9phnpkkjq4sqkhkxlbj"))))
-    (build-system gnu-build-system)
+    (build-system glib-or-gtk-build-system)
     (arguments
      `(#:configure-flags '("--with-gnu-filesystem-hierarchy")
-       #:modules ((guix build gnu-build-system)
+       #:modules ((guix build glib-or-gtk-build-system)
                   (guix build utils)
                   (ice-9 popen)
                   (ice-9 rdelim))
@@ -2732,7 +2733,7 @@ list of components.  This module takes care of that for 
you.")
                             (format #f "~alibguile-gi"
                                     (if (getenv "GUILE_GI_UNINSTALLED")
                                         ""
-                                        ,(format #f "~a/lib/guile/~a/"
+                                        ,(format #f 
"~a/lib/guile/~a/extensions/"
                                                  (assoc-ref outputs "out")
                                                  effective)))
                             ,arg)))))