gnu: awesome: Use absolute paths in session file.

* gnu/packages/wm.scm (awesome)[arguments]: Add a phase to patch the
session '.desktop' file to use the absolute path of the 'awesome'
binary.
This commit is contained in:
Timothy Sample 2019-04-29 20:51:37 -04:00
parent 5aafccebbe
commit 9aa470e912
No known key found for this signature in database
GPG key ID: 2AC6A5EC1C357C59

View file

@ -19,6 +19,7 @@
;;; Copyright © 2018 Pierre-Antoine Rouby <contact@parouby.fr>
;;; Copyright © 2018 Meiyo Peng <meiyo.peng@gmail.com>
;;; Copyright © 2019 Rutger Helling <rhelling@mykolab.com>
;;; Copyright © 2019 Timothy Sample <samplet@ngyro.com>
;;;
;;; This file is part of GNU Guix.
;;;
@ -793,6 +794,13 @@ (define-public awesome
;; There aren't any tests, so just make sure the binary
;; gets built and can be run successfully.
(invoke "../build/awesome" "-v")))
(add-after 'install 'patch-session-file
(lambda* (#:key outputs #:allow-other-keys)
(let* ((out (assoc-ref outputs "out"))
(awesome (string-append out "/bin/awesome")))
(substitute* (string-append out "/share/xsessions/awesome.desktop")
(("Exec=awesome") (string-append "Exec=" awesome)))
#t)))
(add-after 'install 'wrap
(lambda* (#:key inputs outputs #:allow-other-keys)
(let* ((awesome (assoc-ref outputs "out"))