me/guix
Archived
1
0
Fork 0
Code Activity

gnu: kdenlive: Simplify 'wrap-executable phase.

Browse source 
* gnu/packages/kde.scm (kdenlive)[arguments]: Use getenv to set the
values of QT_PLUGIN_PATH and QML2_IMPORT_PATH in the wrapper during
the 'wrap-executable phase.

Signed-off-by: Mathieu Othacehe <othacehe@gnu.org>
This commit is contained in:
Prafulla Giri 2020-09-17 00:55:58 +05:45 • committed by Mathieu Othacehe
parent 34b6dd36bb
commit cd6ec6706c
No known key found for this signature in database
GPG key ID: 8354763531769CA6
1 changed files with 3 additions and 12 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

15
gnu/packages/kde.scm
View file

@ -191,32 +191,23 @@ This package contains GUI widgets for baloo.")
(add-after 'install 'wrap-executable (add-after 'install 'wrap-executable
(lambda* (#:key inputs outputs #:allow-other-keys) (lambda* (#:key inputs outputs #:allow-other-keys)
(let* ((out (assoc-ref outputs "out")) (let* ((out (assoc-ref outputs "out"))
(qtquickcontrols (assoc-ref inputs "qtquickcontrols"))
(qtquickcontrols2 (assoc-ref inputs "qtquickcontrols2"))
(qtbase (assoc-ref inputs "qtbase")) (qtbase (assoc-ref inputs "qtbase"))
(qtdeclarative (assoc-ref inputs "qtdeclarative"))
(frei0r (assoc-ref inputs "frei0r-plugins")) (frei0r (assoc-ref inputs "frei0r-plugins"))
(ffmpeg (assoc-ref inputs "ffmpeg")) (ffmpeg (assoc-ref inputs "ffmpeg"))
(breeze (assoc-ref inputs "breeze")) (breeze (assoc-ref inputs "breeze")))
(qml "/lib/qt5/qml"))
(wrap-program (string-append out "/bin/kdenlive") (wrap-program (string-append out "/bin/kdenlive")
`("PATH" ":" prefix `("PATH" ":" prefix
,(list (string-append ffmpeg "/bin"))) ,(list (string-append ffmpeg "/bin")))
`("XDG_DATA_DIRS" ":" prefix `("XDG_DATA_DIRS" ":" prefix
,(list (string-append breeze "/share"))) ,(list (string-append breeze "/share")))
`("QT_PLUGIN_PATH" ":" prefix `("QT_PLUGIN_PATH" ":" prefix
,(map (lambda (label) ,(list (getenv "QT_PLUGIN_PATH")))
(string-append (assoc-ref inputs label)
"/lib/qt5/plugins/"))
'("qtbase" "qtsvg")))
`("FREI0R_PATH" ":" = `("FREI0R_PATH" ":" =
(,(string-append frei0r "/lib/frei0r-1/"))) (,(string-append frei0r "/lib/frei0r-1/")))
`("QT_QPA_PLATFORM_PLUGIN_PATH" ":" = `("QT_QPA_PLATFORM_PLUGIN_PATH" ":" =
(,(string-append qtbase "/lib/qt5/plugins/platforms"))) (,(string-append qtbase "/lib/qt5/plugins/platforms")))
`("QML2_IMPORT_PATH" ":" prefix `("QML2_IMPORT_PATH" ":" prefix
(,(string-append qtquickcontrols qml) ,(list (getenv "QML2_IMPORT_PATH")))
,(string-append qtquickcontrols2 qml)
,(string-append qtdeclarative qml)))
`("MLT_PREFIX" ":" = `("MLT_PREFIX" ":" =
(,(assoc-ref inputs "mlt"))))) (,(assoc-ref inputs "mlt")))))
#t))))) #t)))))