05/06: gnu: ausweisapp2: Fix WRAP-QT-PROGRAM call.

[guix-commits]

nckx pushed a commit to branch master
in repository guix.

commit c4ac11f704086e5b35b1b513a81203f235a4bdd2
Author: Tobias Geerinckx-Rice <me@tobias.gr>
AuthorDate: Sat Jul 3 14:58:39 2021 +0200

    gnu: ausweisapp2: Fix WRAP-QT-PROGRAM call.
    
    * gnu/packages/security-token.scm (ausweisapp2)[arguments]: Call
    WRAP-QT-PROGRAM with the expected arguments.
---
 gnu/packages/security-token.scm | 5 +++--
 1 file changed, 3 insertions(+), 2 deletions(-)

diff --git a/gnu/packages/security-token.scm b/gnu/packages/security-token.scm
index 49ca1dc..f8c9661 100644
--- a/gnu/packages/security-token.scm
+++ b/gnu/packages/security-token.scm
@@ -758,8 +758,9 @@ devices.")
        #:phases
        (modify-phases %standard-phases
          (add-after 'install 'wrap-qt
-           (lambda* (#:key outputs #:allow-other-keys)
-             (wrap-qt-program (assoc-ref outputs "out") "AusweisApp2"))))))
+           (lambda* (#:key inputs outputs #:allow-other-keys)
+             (let ((out (assoc-ref outputs "out")))
+               (wrap-qt-program "AusweisApp2" #:output out #:inputs 
inputs)))))))
     (home-page "https://github.com/Governikus/AusweisApp2";)
     (synopsis
      "Authentication program for German ID cards and residence permits")