gnu: kio: Adopt a patch from Nix.

* gnu/package/kde-frameworks.scm (kio)[arguments]
  <#:phases>'patch': New phase.
This commit is contained in:
Hartmut Goebel 2017-09-26 10:18:46 +02:00
parent 3d7bb7b304
commit bb4fcf7ba6
No known key found for this signature in database
GPG key ID: 634A8DFFD3F631DF

View file

@ -2446,6 +2446,14 @@ (define-public kio
`(#:tests? #f ; FIXME: 41/50 tests fail.
#:phases
(modify-phases %standard-phases
(add-after 'unpack 'patch
(lambda _
;; Better error message (taken from nix)
(substitute* "src/kiod/kiod_main.cpp"
(("(^\\s*qCWarning(KIOD_CATEGORY) << \"Error loading plugin:\")( << loader.errorString();)" _ a b)
(string-append a "<< name" b)))
;; TODO: samba-search-path.patch from nix: search smbd on $PATH
#t))
(add-before 'check 'check-setup
(lambda _
(setenv "HOME" (getcwd))