1
Fork 0
mirror of https://https.git.savannah.gnu.org/git/guix.git/ synced 2025-07-13 18:40:57 +02:00

gnu: qelectrotech: Use GEXPs.

* gnu/packages/engineering.scm (qelectrotech): Use GEXPs.

Change-Id: Ibfdce387805f01a3073b81e2ff59b5521514f0fa
This commit is contained in:
Artyom V. Poptsov 2025-03-22 23:35:25 +03:00
parent 950f9c7108
commit 66c44dd6e4
No known key found for this signature in database
GPG key ID: 935EBE0736DC857E

View file

@ -924,15 +924,15 @@ required for Fritzing app.")
(arguments (arguments
;; XXX: tests are built for the CMake build option but it seems to be ;; XXX: tests are built for the CMake build option but it seems to be
;; broken in 0.8.0. ;; broken in 0.8.0.
`(#:tests? #f (list #:tests? #f
#:phases #:phases
(modify-phases %standard-phases #~(modify-phases %standard-phases
(replace 'configure (replace 'configure
(lambda* (#:key outputs #:allow-other-keys) (lambda _
(let ((out (assoc-ref outputs "out"))) ;; Patch hardcoded path before running qmake.
;; Patch hardcoded path before running qmake. (substitute* "qelectrotech.pro"
(substitute* "qelectrotech.pro" (("\\/usr\\/local") out)) (("\\/usr\\/local") #$output))
(invoke "qmake"))))))) (invoke "qmake"))))))
(native-inputs (native-inputs
(list pkg-config qttools-5)) (list pkg-config qttools-5))
(inputs (inputs