~whereiseveryone/guixrus

3d821f2daeee8d78d227803581b5ece00d877642 — jgart 1 year, 4 months ago 6b35a72
qtile: install desktop file
1 files changed, 13 insertions(+), 3 deletions(-)

M guixrus/packages/qtile.scm
M guixrus/packages/qtile.scm => guixrus/packages/qtile.scm +13 -3
@@ 158,8 158,8 @@
          (base32 "12wg8y33xgb0x0gd9xfylxss97p97dy1cy52yln64493fi6wphr7"))))
    (build-system python-build-system)
    (arguments
     (list 
      #:tests? #f
     (list
      #:tests? #f ; TODO
      #:phases
      #~(modify-phases %standard-phases
         (add-after 'unpack 'patch-paths


@@ 190,7 190,17 @@
           (lambda* (#:key tests? inputs outputs #:allow-other-keys)
             (when tests?
               (add-installed-pythonpath inputs outputs)
               (invoke "pytest" "-vv")))))))
               (invoke "pytest" "-vv"))))
         (add-after 'install 'install-xsession
           (lambda* (#:key outputs #:allow-other-keys)
             (let* ((out (assoc-ref outputs "out"))
                    (xsessions (string-append out "/share/xsessions"))
                    (qtile (string-append out "/bin/qtile start")))
               (mkdir-p xsessions)
               (copy-file "resources/qtile.desktop"
                          (string-append xsessions "/qtile.desktop"))
               (substitute* (string-append xsessions "/qtile.desktop")
                 (("qtile start") qtile))))))))
    (inputs
      (list glib pango pulseaudio))
    (native-inputs