3
5
Fork 0
mirror of git://git.savannah.gnu.org/guix.git synced 2023-12-14 03:33:07 +01:00

gnu: qtimageformats: Fix build.

Reported by <nefix> on IRC.

* gnu/packages/qt.scm (qtimageformats)[arguments]: Add a 'fix-build phase.

Signed-off-by: Mathieu Othacehe <othacehe@gnu.org>
This commit is contained in:
Michael Rohleder 2020-07-31 10:15:08 +02:00 committed by Mathieu Othacehe
parent 7caa3506ea
commit a0a55309a7
No known key found for this signature in database
GPG key ID: 8354763531769CA6

View file

@ -18,6 +18,7 @@
;;; Copyright © 2020 Kei Kebreau <kkebreau@posteo.net>
;;; Copyright © 2020 TomZ <tomz@freedommail.ch>
;;; Copyright © 2020 Jonathan Brielmaier <jonathan.brielmaier@web.de>
;;; Copyright © 2020 Michael Rohleder <mike@rohleder.de>
;;;
;;; This file is part of GNU Guix.
;;;
@ -712,6 +713,16 @@ HostData=lib/qt5
'(begin
(delete-file-recursively "src/3rdparty")
#t))))
(arguments
(substitute-keyword-arguments (package-arguments qtsvg)
((#:phases phases)
`(modify-phases ,phases
(add-after 'unpack 'fix-build
(lambda _
(substitute* "src/plugins/imageformats/jp2/qjp2handler.cpp"
(("^#include <jasper/jasper.h>")
"#include <jasper/jasper.h>\n#include <QtCore/qmath.h>"))
#t))))))
(native-inputs `())
(inputs
`(("jasper" ,jasper)