33/37: gnu: isc-dhcp: Fix building on riscv64-linux.

[guix-commits]

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

commit f2973b67af853ad312387906cb4258b45d7c484b
Author: Efraim Flashner <efraim@flashner.co.il>
AuthorDate: Thu Sep 2 15:20:37 2021 +0300

    gnu: isc-dhcp: Fix building on riscv64-linux.
    
    * gnu/packages/admin.scm (isc-dhcp)[arguments]: Add phase to update
    configure scripts.
    [inputs]: Add config.
---
 gnu/packages/admin.scm | 16 ++++++++++++++++
 1 file changed, 16 insertions(+)

diff --git a/gnu/packages/admin.scm b/gnu/packages/admin.scm
index 419b78b..b9fe421 100644
--- a/gnu/packages/admin.scm
+++ b/gnu/packages/admin.scm
@@ -1231,6 +1231,21 @@ connection alive.")
                        (setenv "BUILD_CC" "gcc")
                        #t)))
                  '())
+           (add-before 'build 'update-config-scripts
+             (lambda* (#:key native-inputs inputs #:allow-other-keys)
+               (for-each (lambda (file)
+                               (install-file
+                                 (search-input-file
+                                   (or native-inputs inputs)
+                                   (string-append "/bin/" file)) "."))
+                         '("config.guess" "config.sub"))
+               (for-each (lambda (file)
+                               (install-file
+                                 (search-input-file
+                                   (or native-inputs inputs)
+                                   (string-append "/bin/" file))
+                                 (string-append "bind/bind-" ,bind-version)))
+                         '("config.guess" "config.sub"))))
            (add-after 'configure 'post-configure
              (lambda* (#:key outputs #:allow-other-keys)
                ;; Point to the right client script, which will be
@@ -1336,6 +1351,7 @@ connection alive.")
                      (base32
                       
"0hhkb4d14hvly2751cxl2s2xyim3bri8qaisgkcm456xfi5wpy6b"))))
 
+                ("config" ,config)
                 ("coreutils*" ,coreutils)
                 ("sed*" ,sed)))