branch master updated: gnu: xdg-desktop-portal-wlr: Install missing documentation.

[guix-commits]

This is an automated email from the git hooks/post-receive script.

nckx pushed a commit to branch master
in repository guix.

The following commit(s) were added to refs/heads/master by this push:
     new c8316c1e47 gnu: xdg-desktop-portal-wlr: Install missing documentation.
c8316c1e47 is described below

commit c8316c1e47ce2ace5474cbcda03555cf915b4fce
Author: Tobias Geerinckx-Rice <me@tobias.gr>
AuthorDate: Sun Dec 4 01:00:00 2022 +0100

    gnu: xdg-desktop-portal-wlr: Install missing documentation.
    
    * gnu/packages/freedesktop.scm (xdg-desktop-portal-wlr)[arguments]: Add a 
new
    'install-documentation phase.
---
 gnu/packages/freedesktop.scm | 7 ++++++-
 1 file changed, 6 insertions(+), 1 deletion(-)

diff --git a/gnu/packages/freedesktop.scm b/gnu/packages/freedesktop.scm
index 077d56ad3d..4a4bb18002 100644
--- a/gnu/packages/freedesktop.scm
+++ b/gnu/packages/freedesktop.scm
@@ -2759,7 +2759,12 @@ for xdg-desktop-portal that is using Qt/KF5.")
                   (string-append "execl(\"" sh "\", \"" sh "\"")))
                (substitute* "src/screencast/screencast.c"
                  (("execvp\\(\"sh")
-                  (string-append "execvp(\"" sh)))))))))
+                  (string-append "execvp(\"" sh))))))
+         (add-after 'install 'install-documentation
+           (lambda* (#:key outputs #:allow-other-keys)
+             (install-file "../source/README.md"
+                           (string-append (assoc-ref outputs "out")
+                                          "/share/doc/" ,name)))))))
     (native-inputs
      (list cmake pkg-config))
     (inputs (list elogind