ryan77627/guix
1
0
Fork 0
mirror of https://git.in.rschanz.org/ryan77627/guix.git synced 2024-11-07 15:36:20 -05:00
Code Issues Projects Releases Packages Wiki Activity Actions

gnu: Add autorandr.

Browse source 
* gnu/packages/xdisorg.scm (autorandr): New variable.
This commit is contained in:
Pierre Neidhardt 2019-03-07 22:23:01 +01:00
parent 945723be97
commit d748cb5f47
No known key found for this signature in database
GPG key ID: 9BDCF497A4BBCC7F
1 changed files with 56 additions and 1 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

57
gnu/packages/xdisorg.scm
View file

@ -23,7 +23,7 @@
;;; Copyright © 2017 Mike Gerwitz <mtg@gnu.org>
;;; Copyright © 2018 Thomas Sigurdsen <tonton@riseup.net>
;;; Copyright © 2018, 2019 Rutger Helling <rhelling@mykolab.com>
;;; Copyright © 2018 Pierre Neidhardt <mail@ambrevar.xyz>
;;; Copyright © 2018, 2019 Pierre Neidhardt <mail@ambrevar.xyz>
;;; Copyright © 2018 Nam Nguyen <namn@berkeley.edu>
;;;
;;; This file is part of GNU Guix.
@ -69,6 +69,7 @@ (define-module (gnu packages xdisorg)
#:use-module (gnu packages glib)
#:use-module (gnu packages gnome)
#:use-module (gnu packages icu4c)
#:use-module (gnu packages man)
#:use-module (gnu packages maths)
#:use-module (gnu packages m4)
#:use-module (gnu packages ncurses)
@ -132,6 +133,60 @@ (define-public arandr
program.")
(license license:gpl3+)))
(define-public autorandr
;; Use latest commit since 1.7 lacks many new features such as the
;; autorandr_launcher.
(let ((commit "b484c0ea9c9a4838278bbd661a7cc384333c1df8"))
(package
(name "autorandr")
(version (git-version "1.7" "1" commit))
(home-page "https://github.com/phillipberndt/autorandr")
(source
(origin
(method git-fetch)
(uri (git-reference
(url home-page)
(commit commit)))
(file-name (git-file-name name version))
(sha256
(base32
"0da17kzsisjv3s993j5idkk1n2d2cvjdn7pngs2b0ic1r2h5z02h"))))
(build-system python-build-system)
(native-inputs
`(("man-db" ,man-db)))
(inputs
`(("xrandr" ,xrandr)
("libxcb" ,libxcb)))
(arguments
`(#:phases
(modify-phases %standard-phases
(add-before 'build 'configure
(lambda* (#:key inputs #:allow-other-keys)
(substitute* "autorandr.py"
(("popen\\(\"xrandr") (string-append "popen(\""
(assoc-ref inputs "xrandr")
"/bin/xrandr"))
(("\\[\"xrandr") (string-append "[\""
(assoc-ref inputs "xrandr")
"/bin/xrandr")))
#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_completiond.d"
"install_manpage"
"install_bash_completion"
"install_launcher"))))))
(synopsis "Auto-detect connected displays and load appropiate setup")
(description "Autorandr wraps around xrandr to help with X11
multi-screen configuration management. It allows the user to create profiles
for various multi-screen setups. Autorandr automatically detects the profiles
that can be activated based on the connected hardware. Hook scripts can be
used to further tweak the behaviour of the different profiles.")
(license license:gpl3+))))
(define-public xclip
(package
(name "xclip")