Archived
1
0
Fork 0

gnu: qt: Use invoke.

* gnu/packages/qt.scm (qt)[arguments]: Use invoke.
This commit is contained in:
Efraim Flashner 2018-10-21 10:07:17 +03:00
parent 124351efad
commit 3ea61f9642
No known key found for this signature in database
GPG key ID: 41AAE7DCCA3D8351

View file

@ -249,51 +249,51 @@ system, and the core design of Django is reused in Grantlee.")
(("/bin/ls") (which "ls"))) (("/bin/ls") (which "ls")))
;; do not pass "--enable-fast-install", which makes the ;; do not pass "--enable-fast-install", which makes the
;; configure process fail ;; configure process fail
(zero? (system* (invoke
"./configure" "./configure"
"-verbose" "-verbose"
"-prefix" out "-prefix" out
"-docdir" (string-append out "/share/doc/qt5") "-docdir" (string-append out "/share/doc/qt5")
"-headerdir" (string-append out "/include/qt5") "-headerdir" (string-append out "/include/qt5")
"-archdatadir" (string-append out "/lib/qt5") "-archdatadir" (string-append out "/lib/qt5")
"-datadir" (string-append out "/share/qt5") "-datadir" (string-append out "/share/qt5")
"-examplesdir" (string-append "-examplesdir" (string-append
examples "/share/doc/qt5/examples") ; 151MiB examples "/share/doc/qt5/examples") ; 151MiB
"-opensource" "-opensource"
"-confirm-license" "-confirm-license"
;; These features require higher versions of Linux than the ;; These features require higher versions of Linux than the
;; minimum version of the glibc. See ;; minimum version of the glibc. See
;; src/corelib/global/minimum-linux_p.h. By disabling these ;; src/corelib/global/minimum-linux_p.h. By disabling these
;; features Qt5 applications can be used on the oldest ;; features Qt5 applications can be used on the oldest
;; kernels that the glibc supports, including the RHEL6 ;; kernels that the glibc supports, including the RHEL6
;; (2.6.32) and RHEL7 (3.10) kernels. ;; (2.6.32) and RHEL7 (3.10) kernels.
"-no-feature-getentropy" ; requires Linux 3.17 "-no-feature-getentropy" ; requires Linux 3.17
"-no-feature-renameat2" ; requires Linux 3.16 "-no-feature-renameat2" ; requires Linux 3.16
;; Do not build examples; for the time being, we ;; Do not build examples; for the time being, we
;; prefer to save the space and build time. ;; prefer to save the space and build time.
"-no-compile-examples" "-no-compile-examples"
;; Most "-system-..." are automatic, but some use ;; Most "-system-..." are automatic, but some use
;; the bundled copy by default. ;; the bundled copy by default.
"-system-sqlite" "-system-sqlite"
"-system-harfbuzz" "-system-harfbuzz"
"-system-pcre" "-system-pcre"
;; explicitly link with openssl instead of dlopening it ;; explicitly link with openssl instead of dlopening it
"-openssl-linked" "-openssl-linked"
;; explicitly link with dbus instead of dlopening it ;; explicitly link with dbus instead of dlopening it
"-dbus-linked" "-dbus-linked"
;; don't use the precompiled headers ;; don't use the precompiled headers
"-no-pch" "-no-pch"
;; drop special machine instructions not supported ;; drop special machine instructions not supported
;; on all instances of the target ;; on all instances of the target
,@(if (string-prefix? "x86_64" ,@(if (string-prefix? "x86_64"
(or (%current-target-system) (or (%current-target-system)
(%current-system))) (%current-system)))
'() '()
'("-no-sse2")) '("-no-sse2"))
"-no-mips_dsp" "-no-mips_dsp"
"-no-mips_dspr2"))))) "-no-mips_dspr2"))))
(add-after 'install 'patch-mkspecs (add-after 'install 'patch-mkspecs
(lambda* (#:key outputs #:allow-other-keys) (lambda* (#:key outputs #:allow-other-keys)
(let* ((out (assoc-ref outputs "out")) (let* ((out (assoc-ref outputs "out"))