gnu: kdevelop: Do not hardcode user profile locations in wrapper.

* gnu/packages/kde.scm (kdevelop): [arguments]: Do not add
  ${HOME}/.guix-profile/{share,lib/plugins} to XDG_DATA_DIRS and
  QT_PLUGIN_PATH when wrapping the executable.
This commit is contained in:
Thomas Danckaert 2017-10-08 19:01:59 +02:00
parent 02bc41c4ce
commit 3ceb70e1e6
No known key found for this signature in database
GPG Key ID: 5C3B064C724A5726
1 changed files with 2 additions and 3 deletions

View File

@ -102,17 +102,16 @@
(qtquickcontrols (assoc-ref inputs "qtquickcontrols")) (qtquickcontrols (assoc-ref inputs "qtquickcontrols"))
(qtbase (assoc-ref inputs "qtbase")) (qtbase (assoc-ref inputs "qtbase"))
(qtdeclarative (assoc-ref inputs "qtdeclarative")) (qtdeclarative (assoc-ref inputs "qtdeclarative"))
(profile "$HOME/.guix-profile")
(qml "/qml")) (qml "/qml"))
(wrap-program (string-append out "/bin/kdevelop") (wrap-program (string-append out "/bin/kdevelop")
`("XDG_DATA_DIRS" ":" prefix `("XDG_DATA_DIRS" ":" prefix
,(map (lambda (s) (string-append s "/share")) ,(map (lambda (s) (string-append s "/share"))
(list profile out kdevplatform kcmutils))) (list out kdevplatform kcmutils)))
`("QT_QPA_PLATFORM_PLUGIN_PATH" ":" = `("QT_QPA_PLATFORM_PLUGIN_PATH" ":" =
(,(string-append qtbase "/plugins/platforms"))) (,(string-append qtbase "/plugins/platforms")))
`("QT_PLUGIN_PATH" ":" prefix `("QT_PLUGIN_PATH" ":" prefix
,(map (lambda (s) (string-append s "/lib/plugins")) ,(map (lambda (s) (string-append s "/lib/plugins"))
(list profile out kdevplatform kio))) (list out kdevplatform kio)))
`("QML2_IMPORT_PATH" ":" prefix `("QML2_IMPORT_PATH" ":" prefix
(,(string-append qtquickcontrols qml) (,(string-append qtquickcontrols qml)
,(string-append qtdeclarative qml)))))))))) ,(string-append qtdeclarative qml))))))))))