tv xmonad: add xcalib

2018-12-02 15:43:49 +01:00 · 2018-12-02 15:43:49 +01:00 · a58628d1c3
commit a58628d1c3
parent 46dc547bbe
3 changed files with 6 additions and 0 deletions
--- a/tv/2configs/xserver/default.nix
+++ b/tv/2configs/xserver/default.nix
@ -89,6 +89,7 @@ in {
      pkgs.fzmenu
      pkgs.pulseaudioLight.out
      pkgs.rxvt_unicode
+      pkgs.xcalib
      "/run/wrappers" # for su
    ];
    serviceConfig = {
--- a/tv/5pkgs/haskell/xmonad-tv/src/Paths.hs
+++ b/tv/5pkgs/haskell/xmonad-tv/src/Paths.hs
@ -20,3 +20,6 @@ su = findExecutable "su"

 urxvtc :: FilePath
 urxvtc = findExecutable "urxvtc"
+
+xcalib :: FilePath
+xcalib = findExecutable "xcalib"
--- a/tv/5pkgs/haskell/xmonad-tv/src/main.hs
+++ b/tv/5pkgs/haskell/xmonad-tv/src/main.hs
@ -164,6 +164,8 @@ myKeys conf = Map.fromList $
    , ((0, xF86XK_AudioLowerVolume), audioLowerVolume)
    , ((0, xF86XK_AudioRaiseVolume), audioRaiseVolume)
    , ((0, xF86XK_AudioMute), audioMute)
+
+    , ((_4, xK_Prior), forkFile Paths.xcalib ["-invert", "-alter"] Nothing)
    ]
    where
    _4 = mod4Mask