Archived
1
0
Fork 0

gnu: kimageformats: Use G-expressions.

* gnu/packages/kde-frameworks.scm (kimageformats)[arguments]:
Rewrite as G-expressions.

Signed-off-by: 宋文武 <iyzsong@member.fsf.org>
This commit is contained in:
Zheng Junjie 2023-07-12 23:10:21 +08:00 committed by 宋文武
parent f8c3938755
commit 78a38c5e54
No known key found for this signature in database
GPG key ID: D415BF253B515976

View file

@ -1811,29 +1811,31 @@ by applications to write metadata.")
openexr-2 ; for OpenEXR high dynamic-range images openexr-2 ; for OpenEXR high dynamic-range images
qtbase-5)) qtbase-5))
(arguments (arguments
`(#:phases (list
(modify-phases %standard-phases #:phases
(add-before 'check 'check-setup #~(modify-phases %standard-phases
(lambda _ (add-before 'check 'check-setup
;; make Qt render "offscreen", required for tests (lambda _
(setenv "QT_QPA_PLATFORM" "offscreen") ;; make Qt render "offscreen", required for tests
(setenv "QT_PLUGIN_PATH" (setenv "QT_QPA_PLATFORM" "offscreen")
(string-append (getcwd) "/bin:" (setenv "QT_PLUGIN_PATH"
(getenv "QT_PLUGIN_PATH"))))) (string-append (getcwd) "/bin:"
(replace 'check (getenv "QT_PLUGIN_PATH")))))
(lambda* (#:key tests? #:allow-other-keys) (replace 'check
(when tests? (lambda* (#:key tests? #:allow-other-keys)
(setenv "HOME" (getcwd)) (when tests?
;; FIXME: I guess kde's qt no this fail. (setenv "HOME"
;; see https://invent.kde.org/frameworks/kimageformats/-/jobs/1046283 (getcwd))
(invoke "ctest" "-E" "kimageformats-read-psd"))))) ;; FIXME: I guess kde's qt no this fail.
;; FIXME: The header files of ilmbase (propagated by openexr) are not ;; see https://invent.kde.org/frameworks/kimageformats/-/jobs/1046283
;; found when included by the header files of openexr, and an explicit (invoke "ctest" "-E" "kimageformats-read-psd")))))
;; flag needs to be set. ;; FIXME: The header files of ilmbase (propagated by openexr) are not
#:configure-flags ;; found when included by the header files of openexr, and an explicit
(list (string-append "-DCMAKE_CXX_FLAGS=-I" ;; flag needs to be set.
(assoc-ref %build-inputs "ilmbase") #:configure-flags #~(list (string-append "-DCMAKE_CXX_FLAGS=-I"
"/include/OpenEXR")))) (assoc-ref %build-inputs
"ilmbase")
"/include/OpenEXR"))))
(home-page "https://community.kde.org/Frameworks") (home-page "https://community.kde.org/Frameworks")
(synopsis "Plugins to allow QImage to support extra file formats") (synopsis "Plugins to allow QImage to support extra file formats")
(description "This framework provides additional image format plugins for (description "This framework provides additional image format plugins for