ryan77627/guix
1
0
Fork 0
mirror of https://git.in.rschanz.org/ryan77627/guix.git synced 2024-12-24 21:38:07 -05:00
Code Issues Projects Releases Packages Wiki Activity Actions

gnu: autorandr: Use GEXPs.

Browse source 
* gnu/packages/xdisorg.scm (autorandr): Use GEXPs.

Change-Id: I476e29ddff17c0180e8a0eeefe818954364eac71
Signed-off-by: jgart <jgart@dismail.de>
This commit is contained in:
Artyom V. Poptsov 2024-09-01 21:55:23 +03:00 committed by jgart
parent 5b8d4074f4
commit 9e89185d58
No known key found for this signature in database
GPG key ID: A52AA2B477B6DD35
1 changed files with 23 additions and 23 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

46
gnu/packages/xdisorg.scm
View file

@ -298,29 +298,29 @@ (define-public autorandr
(inputs
(list xrandr libxcb))
(arguments
`(#:phases
(modify-phases %standard-phases
(add-before 'build 'configure
(lambda* (#:key inputs outputs #:allow-other-keys)
(let ((xrandr (search-input-file inputs "/bin/xrandr")))
(substitute* "contrib/etc/xdg/autostart/autorandr.desktop"
(("/usr") (assoc-ref outputs "out")))
(substitute* "autorandr.py"
(("popen\\(\"xrandr") (string-append "popen(\"" xrandr))
(("\\[\"xrandr") (string-append "[\"" xrandr)))
(substitute* "contrib/autorandr_launcher/autorandr_launcher.c"
(("/usr/bin/autorandr")
(string-append (assoc-ref outputs "out") "/bin/autorandr")))
(setenv "CC" "gcc"))
#t))
(add-after 'install 'install-contrib
(lambda* (#:key outputs #:allow-other-keys)
(invoke "make"
(string-append "DESTDIR=" (assoc-ref outputs "out"))
"PREFIX="
"BASH_COMPLETIONS_DIR=etc/bash_completion.d"
"install"
"TARGETS=autorandr launcher manpage bash_completion"))))))
(list
#:phases
#~(modify-phases %standard-phases
(add-before 'build 'configure
(lambda* (#:key inputs outputs #:allow-other-keys)
(let ((xrandr (search-input-file inputs "/bin/xrandr")))
(substitute* "contrib/etc/xdg/autostart/autorandr.desktop"
(("/usr") #$output))
(substitute* "autorandr.py"
(("popen\\(\"xrandr") (string-append "popen(\"" xrandr))
(("\\[\"xrandr") (string-append "[\"" xrandr)))
(substitute* "contrib/autorandr_launcher/autorandr_launcher.c"
(("/usr/bin/autorandr")
(string-append #$output "/bin/autorandr")))
(setenv "CC" "gcc"))))
(add-after 'install 'install-contrib
(lambda* (#:key outputs #:allow-other-keys)
(invoke "make"
(string-append "DESTDIR=" #$output)
"PREFIX="
"BASH_COMPLETIONS_DIR=etc/bash_completion.d"
"install"
"TARGETS=autorandr launcher manpage bash_completion"))))))
(synopsis "Auto-detect connected displays and load appropriate setup")
(description "Autorandr wraps around xrandr to help with X11
multi-screen configuration management. It allows the user to create profiles