07/85: gnu: mes-boot: Use commencement-build-target.

[guix-commits]

efraim pushed a commit to branch wip-riscv-bootstrap
in repository guix.

commit 7ebc677654dcba7f42386066236ded396efa29d8
Author: Efraim Flashner <efraim@flashner.co.il>
AuthorDate: Wed Sep 25 09:13:03 2024 +0300

    gnu: mes-boot: Use commencement-build-target.
    
    * gnu/packages/commencement.scm (mes-boot)[arguments]: Adjust 'configure
    phase to use commencement-build-target.
    
    Change-Id: Iee906690041f6fe3d015bfa594d64e330cd31be8
---
 gnu/packages/commencement.scm | 7 +++----
 1 file changed, 3 insertions(+), 4 deletions(-)

diff --git a/gnu/packages/commencement.scm b/gnu/packages/commencement.scm
index ec80571a5b..e09cccdea7 100644
--- a/gnu/packages/commencement.scm
+++ b/gnu/packages/commencement.scm
@@ -448,10 +448,9 @@ MesCC-Tools), and finally M2-Planet.")
                 (invoke "gash" "configure.sh"
                         (string-append "--prefix=" out)
                         (string-append "--host="
-                          #$(cond
-                              ((target-x86-64?) "i686-linux-gnu")
-                              (#t (platform-system->target
-                                    (%current-system)))))))))
+                          #$(string-replace-substring
+                              (commencement-build-target)
+                              "-unknown-" "-"))))))
           (replace 'build
             (lambda _
               ;; TODO: GUILE_LOAD_PATH is leaking. We need to clean it.