1
0
mirror of https://git.savannah.gnu.org/git/guix.git synced 2026-04-06 21:20:33 +02:00

build-system: qt: Fix output missing in wrapped variables.

* guix/build/qt-build-system .scm (handle-output): Use directory of
  output, not its name.
This commit is contained in:
Hartmut Goebel
2019-12-07 20:41:24 +01:00
parent ebce20b2c8
commit f69439dff4

View File

@@ -90,8 +90,8 @@ add a dependency of that output on Qt."
(unless (member output qt-wrap-excluded-outputs)
(let ((bin-list (find-files-to-wrap directory))
(vars-to-wrap (variables-for-wrapping
(append (list output)
input-directories))))
(append (list directory)
input-directories))))
(when (not (null? vars-to-wrap))
(for-each (cut apply wrap-program <> vars-to-wrap)
bin-list)))))))