branch master updated: gnu: hedgewars: Install desktop icon.

[guix-commits]

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

ngz pushed a commit to branch master
in repository guix.

The following commit(s) were added to refs/heads/master by this push:
     new 0fc715f  gnu: hedgewars: Install desktop icon.
0fc715f is described below

commit 0fc715f9712424b0147c6bd261ce10c25fe73082
Author: Timotej Lazar <timotej.lazar@araneo.si>
AuthorDate: Wed Jul 15 19:13:47 2020 +0200

    gnu: hedgewars: Install desktop icon.
    
    * gnu/packages/games.scm (hedgewars)[arguments]: Add ‘install-icon’ phase.
    
    Signed-off-by: Nicolas Goaziou <mail@nicolasgoaziou.fr>
---
 gnu/packages/games.scm | 10 +++++++++-
 1 file changed, 9 insertions(+), 1 deletion(-)

diff --git a/gnu/packages/games.scm b/gnu/packages/games.scm
index 5de6dbf..e60c455 100644
--- a/gnu/packages/games.scm
+++ b/gnu/packages/games.scm
@@ -8813,7 +8813,15 @@ play with up to four players simultaneously.  It has 
network support.")
        #:phases
        (modify-phases %standard-phases
          (replace 'check
-           (lambda _ (invoke "ctest"))))))
+           (lambda _ (invoke "ctest")))
+         (add-after 'install 'install-icon
+           (lambda _
+             ;; Install icon for the desktop file.
+             (let* ((out (assoc-ref %outputs "out"))
+                    (icons (string-append out 
"/share/icons/hicolor/512x512/apps")))
+               (with-directory-excursion (string-append "../hedgewars-src-" 
,version)
+                 (install-file "misc/hedgewars.png" icons)))
+             #t)))))
     (inputs
      `(("ffmpeg" ,ffmpeg)
        ("freeglut" ,freeglut)