~ruther/guix-local

3cec3624ae4a670b122fa7605b8385879c16930b — Sughosha 1 year, 2 months ago 9d9a629
gnu: kio-extras: Fix kiod path.

* gnu/packages/kde.scm (kio-extras)[arguments]: Realign.
<#:phases>: Add fix-kiod-path phase.

Change-Id: Ifda410609323dc55797a9e97191909824679dd8f
Signed-off-by: Zheng Junjie <z572@z572.online>
1 files changed, 21 insertions(+), 7 deletions(-)

M gnu/packages/kde.scm
M gnu/packages/kde.scm => gnu/packages/kde.scm +21 -7
@@ 753,13 753,27 @@ KDSoap.")
                "0h720wcgsdx9h5vlr4flxrd3djmhwvlwkrf0yzwsf4amcb9wds8r"))))
    (build-system cmake-build-system)
    (arguments
     (list #:phases #~(modify-phases %standard-phases
                        (replace 'check
                          (lambda* (#:key tests? #:allow-other-keys)
                            (when tests?
                              (setenv "HOME" (getcwd))
                              (setenv "TMPDIR" (getcwd))
                              (invoke "ctest" "-E" "(thumbnailtest|testkioarchive)")))))))
     (list #:phases
           #~(modify-phases %standard-phases
               (replace 'check
                 (lambda* (#:key tests? #:allow-other-keys)
                   (when tests?
                   (setenv "HOME" (getcwd))
                   (setenv "TMPDIR" (getcwd))
                   (invoke "ctest" "-E"
                           "(thumbnailtest|testkioarchive)"))))
               (add-after 'install 'fix-kiod-path
                 (lambda _
                   (let* ((kio #$(this-package-input "kio"))
                          (kf-version
                           #$(version-major
                              (package-version (this-package-input "kio")))))
                     (substitute* (string-append #$output
                                                 "/share/dbus-1/services/"
                                                 "org.kde.kmtpd5.service")
                       (("Exec=.*$")
                        (string-append "Exec=" kio "/libexec/kf" kf-version
                                       "/kiod" kf-version "\n")))))))))
    (native-inputs (list extra-cmake-modules dbus kdoctools pkg-config qttools))
    ;; TODO: libappimage
    (inputs (list gperf