nckx pushed a commit to branch master
in repository guix.
commit ddec076b963a80056fc5af3f0c74dd8870ae491e
Author: Tobias Geerinckx-Rice <[email protected]>
AuthorDate: Sun Oct 3 16:30:53 2021 +0200
gnu: sx: Don't propagate xauth.
* gnu/packages/xdisorg.scm (sx)[arguments]: Patch sx to refer to xauth.
[propagated-inputs]: Move xauth from here…
[inputs]: …to here.
---
gnu/packages/xdisorg.scm | 7 ++++++-
1 file changed, 6 insertions(+), 1 deletion(-)
diff --git a/gnu/packages/xdisorg.scm b/gnu/packages/xdisorg.scm
index 9646f55..68f856f 100644
--- a/gnu/packages/xdisorg.scm
+++ b/gnu/packages/xdisorg.scm
@@ -2869,8 +2869,13 @@ and execute @file{.desktop} files of the Application
type.")
(list (string-append "PREFIX=" out)))
#:phases
(modify-phases %standard-phases
+ (add-after 'unpack 'refer-to-xauth
+ (lambda* (#:key inputs #:allow-other-keys)
+ (substitute* "sx"
+ (("\\bxauth\\b" command)
+ (string-append (assoc-ref inputs "xauth") "/bin/" command)))))
(delete 'configure)))) ; no configure script
- (propagated-inputs
+ (inputs
`(("xauth" ,xauth)))
(home-page "https://github.com/Earnestly/sx";)
(synopsis "Start an xorg server")
