[bug#62873] [PATCH gnome-team 3/4] build: meson: Honor bindir, libdir and includedir.

[Maxim Cournoyer <liliana.prikler@gmail.com>]

[-- Warning: decoded text below may be mangled, UTF-8 assumed --]
[-- Attachment #1: Type: text/plain, Size: 2570 bytes --]

This brings our meson-build-system closer to our gnu-build-system in terms of
using different installation prefixes based on the presence of outputs such as
"bin", "lib" or "include".

* guix/build/meson-build-system.scm (configure): Add --bindir, --libdir and
--includedir according to the presence of the "bin", "lib" and "include"
outputs, as done in gnu-build-system.

Signed-off-by: Liliana Marie Prikler <liliana.prikler@gmail.com>
---
 guix/build/meson-build-system.scm | 20 +++++++++++++++++++-
 1 file changed, 19 insertions(+), 1 deletion(-)

diff --git a/guix/build/meson-build-system.scm b/guix/build/meson-build-system.scm
index 3d1a27cba7..d11a5d8e18 100644
--- a/guix/build/meson-build-system.scm
+++ b/guix/build/meson-build-system.scm
@@ -2,7 +2,7 @@
 ;;; Copyright © 2017 Peter Mikkelsen <petermikkelsen10@gmail.com>
 ;;; Copyright © 2018 Ricardo Wurmus <rekado@elephly.net>
 ;;; Copyright © 2018 Marius Bakke <mbakke@fastmail.com>
-;;; Copyright © 2021 Maxim Cournoyer <maxim.cournoyer@gmail.com>
+;;; Copyright © 2021, 2023 Maxim Cournoyer <maxim.cournoyer@gmail.com>
 ;;;
 ;;; This file is part of GNU Guix.
 ;;;
@@ -41,10 +41,28 @@ (define* (configure #:key outputs configure-flags build-type
                     #:allow-other-keys)
   "Configure the given package."
   (let* ((out (assoc-ref outputs "out"))
+         (bindir (assoc-ref outputs "bin"))
+         (libdir (assoc-ref outputs "lib"))
+         (includedir (assoc-ref outputs "include"))
          (source-dir (getcwd))
          (build-dir "../build")
          (prefix (assoc-ref outputs "out"))
          (args `(,(string-append "--prefix=" prefix)
+                 ,@(if bindir
+                       (list (string-append "--bindir=" bindir "/bin"))
+                       '())
+                 ,@(if libdir
+                       (cons (string-append "--libdir=" libdir "/lib")
+                             (if includedir
+                                 '()
+                                 (list
+                                  (string-append "--includedir="
+                                                 libdir "/include"))))
+                       '())
+                 ,@(if includedir
+                       (list (string-append "--includedir="
+                                            includedir "/include"))
+                       '())
                  ,(string-append "--buildtype=" build-type)
                  ,(string-append "-Dc_link_args=-Wl,-rpath="
                                  (assoc-ref outputs "out") "/lib")
-- 
2.39.2