02/02: gnu: kdenlive: Add breeze-icons.

[guix-commits]

htgoebel pushed a commit to branch master
in repository guix.

commit 66016b1ae01423bc0671cc39992263520fd77998
Author: Hartmut Goebel <h.goebel@crazy-compilers.com>
AuthorDate: Sat Dec 12 17:16:45 2020 +0100

    gnu: kdenlive: Add breeze-icons.
    
    Since breeze-icons are now longer united into breeze, these need to be
    explicitly added.
    
    * gnu/package/kde.scm (kdenlive)[inputs]: Add breeze-icons.
      [argmuments]{phases}<wrap-executable>: Add breeze-icons to XDG_DATA_DIRS.
---
 gnu/packages/kde.scm | 9 ++++++---
 1 file changed, 6 insertions(+), 3 deletions(-)

diff --git a/gnu/packages/kde.scm b/gnu/packages/kde.scm
index 89c7dee..80a3ca7 100644
--- a/gnu/packages/kde.scm
+++ b/gnu/packages/kde.scm
@@ -185,7 +185,8 @@ This package contains GUI widgets for baloo.")
          ("qtquickcontrols" ,qtquickcontrols)
          ("qtquickcontrols2" ,qtquickcontrols2)
          ("kiconthemes" ,kiconthemes)
-         ("breeze" ,breeze)
+         ("breeze" ,breeze) ; make dark them available easily
+         ("breeze-icons" ,breeze-icons) ; recommended icon set
          ("purpose" ,purpose)
          ("qtwebkit" ,qtwebkit)
          ("qtgraphicaleffects" ,qtgraphicaleffects)
@@ -200,12 +201,14 @@ This package contains GUI widgets for baloo.")
                       (qtbase (assoc-ref inputs "qtbase"))
                       (frei0r (assoc-ref inputs "frei0r-plugins"))
                       (ffmpeg (assoc-ref inputs "ffmpeg"))
-                      (breeze (assoc-ref inputs "breeze")))
+                      (breeze (assoc-ref inputs "breeze"))
+                      (breeze-icons (assoc-ref inputs "breeze-icons")))
                  (wrap-program (string-append out "/bin/kdenlive")
                    `("PATH" ":" prefix
                      ,(list (string-append ffmpeg "/bin")))
                    `("XDG_DATA_DIRS" ":" prefix
-                     ,(list (string-append breeze "/share")))
+                     ,(list (string-append breeze "/share")
+                            (string-append breeze-icons "/share")))
                    `("QT_PLUGIN_PATH" ":" prefix
                      ,(list (getenv "QT_PLUGIN_PATH")))
                    `("FREI0R_PATH" ":" =