ryan77627/guix
1
0
Fork 0
mirror of https://git.in.rschanz.org/ryan77627/guix.git synced 2024-12-26 22:38:07 -05:00
Code Issues Projects Releases Packages Wiki Activity Actions

gnu: python-pyside-2: Use "this-package-input" instead of "assoc-ref".

Browse source 
* gnu/packages/qt.scm (python-pyside-2)[arguments]<#:configure-flags>: Use
SEARCH-INPUT-FILE.
<#:phases>: In phase "fix-qt-module-detection", use "this-package-input".

Signed-off-by: Marius Bakke <marius@gnu.org>
This commit is contained in:
Zhu Zihao 2022-08-24 22:57:44 +08:00 committed by Marius Bakke
parent 39647c9741
commit 5c08546558
No known key found for this signature in database
GPG key ID: A2A06DF2A33A54FA
1 changed files with 25 additions and 23 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

48
gnu/packages/qt.scm
View file

@ -3880,8 +3880,8 @@ (define-public python-pyside-2
#:configure-flags #:configure-flags
#~(list "-DBUILD_TESTS=FALSE" #~(list "-DBUILD_TESTS=FALSE"
(string-append "-DPYTHON_EXECUTABLE=" (string-append "-DPYTHON_EXECUTABLE="
(assoc-ref %build-inputs "python") (search-input-file %build-inputs
"/bin/python")) "/bin/python")))
#:modules '((guix build cmake-build-system) #:modules '((guix build cmake-build-system)
(guix build utils) (guix build utils)
(srfi srfi-1)) (srfi srfi-1))
@ -3890,33 +3890,35 @@ (define-public python-pyside-2
(add-after 'unpack 'go-to-source-dir (add-after 'unpack 'go-to-source-dir
(lambda _ (chdir "sources/pyside2") #t)) (lambda _ (chdir "sources/pyside2") #t))
(add-after 'go-to-source-dir 'fix-qt-module-detection (add-after 'go-to-source-dir 'fix-qt-module-detection
(lambda* (#:key inputs #:allow-other-keys) (lambda _
;; Activate qt module support even if it not in the same ;; Activate qt module support even if it not in the same
;; directory as qtbase. ;; directory as qtbase.
(substitute* "../cmake_helpers/helpers.cmake" (substitute* "../cmake_helpers/helpers.cmake"
(("\\(\"\\$\\{found_basepath\\}\" GREATER \"0\"\\)") (("\\(\"\\$\\{found_basepath\\}\" GREATER \"0\"\\)")
"true")) "true"))
;; Add include directories for qt modules. ;; Add include directories for qt modules.
(let ((dirs (map (lambda (name) (let ((dirs (map (lambda (path)
(string-append (assoc-ref inputs name) (string-append path "/include/qt5"))
"/include/qt5")) (list
'("qtdatavis3d" #$@(map (lambda (name)
"qtdeclarative" (this-package-input name))
"qtlocation" '("qtdatavis3d"
"qtmultimedia" "qtdeclarative"
"qtquickcontrols" "qtlocation"
"qtquickcontrols2" "qtmultimedia"
"qtscript" "qtquickcontrols"
"qtscxml" "qtquickcontrols2"
"qtsensors" "qtscript"
"qtspeech" "qtscxml"
"qtsvg" "qtsensors"
"qttools" "qtspeech"
"qtwebchannel" "qtsvg"
"qtwebengine" "qttools"
"qtwebsockets" "qtwebchannel"
"qtx11extras" "qtwebengine"
"qtxmlpatterns")))) "qtwebsockets"
"qtx11extras"
"qtxmlpatterns"))))))
(substitute* "cmake/Macros/PySideModules.cmake" (substitute* "cmake/Macros/PySideModules.cmake"
(("\\$\\{PATH_SEP\\}\\$\\{core_includes\\}" all) (("\\$\\{PATH_SEP\\}\\$\\{core_includes\\}" all)
(fold (lambda (dir paths) (fold (lambda (dir paths)