gnu: purpose: Fix build.
* gnu/packages/kde-frameworks.scm (purpose)[arguments]: Add phase to force use of pre-Qt-5.15 logic.
This commit is contained in:
		
							parent
							
								
									fc0c95bca6
								
							
						
					
					
						commit
						9680144d4d
					
				
					 1 changed files with 8 additions and 1 deletions
				
			
		|  | @ -1,6 +1,6 @@ | ||||||
| ;;; GNU Guix --- Functional package management for GNU | ;;; GNU Guix --- Functional package management for GNU | ||||||
| ;;; Copyright © 2015 Andreas Enge <andreas@enge.fr> | ;;; Copyright © 2015 Andreas Enge <andreas@enge.fr> | ||||||
| ;;; Copyright © 2016, 2019 Efraim Flashner <efraim@flashner.co.il> | ;;; Copyright © 2016, 2019, 2020 Efraim Flashner <efraim@flashner.co.il> | ||||||
| ;;; Copyright © 2016-2019 Hartmut Goebel <h.goebel@crazy-compilers.com> | ;;; Copyright © 2016-2019 Hartmut Goebel <h.goebel@crazy-compilers.com> | ||||||
| ;;; Copyright © 2016 David Craven <david@craven.ch> | ;;; Copyright © 2016 David Craven <david@craven.ch> | ||||||
| ;;; Copyright © 2017 Thomas Danckaert <post@thomasdanckaert.be> | ;;; Copyright © 2017 Thomas Danckaert <post@thomasdanckaert.be> | ||||||
|  | @ -3476,6 +3476,13 @@ script engines.") | ||||||
|        ("qtdeclarative" ,qtdeclarative))) |        ("qtdeclarative" ,qtdeclarative))) | ||||||
|     (arguments |     (arguments | ||||||
|      `(#:tests? #f  ;; seem to require network; don't find QTQuick components |      `(#:tests? #f  ;; seem to require network; don't find QTQuick components | ||||||
|  |        #:phases | ||||||
|  |        (modify-phases %standard-phases | ||||||
|  |          (add-after 'unpack 'dont-use-qt515-logic | ||||||
|  |            (lambda _ | ||||||
|  |              (substitute* "src/externalprocess/purposeprocess_main.cpp" | ||||||
|  |                ((" 15") " 16")) | ||||||
|  |              #t))) | ||||||
|        #:configure-flags '("-DBUILD_TESTING=OFF"))) ; not run anyway |        #:configure-flags '("-DBUILD_TESTING=OFF"))) ; not run anyway | ||||||
|     (home-page "https://community.kde.org/Frameworks") |     (home-page "https://community.kde.org/Frameworks") | ||||||
|     (synopsis "Offers available actions for a specific purpose") |     (synopsis "Offers available actions for a specific purpose") | ||||||
|  |  | ||||||
		Reference in a new issue