03/03: gnu: dtc: Install documentation.

[guix-commits]

apteryx pushed a commit to branch master
in repository guix.

commit 5dc8cf849ba70a79217f66cc9feab793fc095902
Author: Maxim Cournoyer <maxim.cournoyer@gmail.com>
AuthorDate: Sun Jan 1 18:45:38 2023 -0500

    gnu: dtc: Install documentation.
    
    * gnu/packages/bootloaders.scm (dtc) [modules]: New argument.
    [phases]: Add install-doc phase.
---
 gnu/packages/bootloaders.scm | 11 ++++++++++-
 1 file changed, 10 insertions(+), 1 deletion(-)

diff --git a/gnu/packages/bootloaders.scm b/gnu/packages/bootloaders.scm
index 41e33a24b5..029672721f 100644
--- a/gnu/packages/bootloaders.scm
+++ b/gnu/packages/bootloaders.scm
@@ -575,6 +575,7 @@ The SUBDIR argument defaults to \"efi/Guix\", as it is also 
the case for
     (build-system gnu-build-system)
     (arguments
      (list
+      #:modules `(,@%gnu-build-system-modules (srfi srfi-26))
       #:make-flags
       #~(list (string-append "CC=" #$(cc-for-target))
               ;; /bin/fdt{get,overlay,put} need help finding libfdt.so.1.
@@ -590,7 +591,15 @@ The SUBDIR argument defaults to \"efi/Guix\", as it is 
also the case for
                              "tests/run_tests.sh")
                 (("pkg-config")
                  #$(pkg-config-for-target)))))
-          (delete 'configure))))        ;no configure script
+          (delete 'configure)           ;no configure script
+          (add-before 'build 'install-doc
+            (lambda _
+              (with-directory-excursion "Documentation"
+                (for-each (cut install-file <> (string-append
+                                                #$output "/share/doc/dtc/"))
+                          '("dts-format.txt"
+                            "dt-object-internal.txt"
+                            "manual.txt"))))))))
     (native-inputs
      (append
       (list bison