tv xmonad: add xcalib

This commit is contained in:
tv 2018-12-02 15:43:49 +01:00
parent 46dc547bbe
commit a58628d1c3
3 changed files with 6 additions and 0 deletions

View File

@ -89,6 +89,7 @@ in {
pkgs.fzmenu pkgs.fzmenu
pkgs.pulseaudioLight.out pkgs.pulseaudioLight.out
pkgs.rxvt_unicode pkgs.rxvt_unicode
pkgs.xcalib
"/run/wrappers" # for su "/run/wrappers" # for su
]; ];
serviceConfig = { serviceConfig = {

View File

@ -20,3 +20,6 @@ su = findExecutable "su"
urxvtc :: FilePath urxvtc :: FilePath
urxvtc = findExecutable "urxvtc" urxvtc = findExecutable "urxvtc"
xcalib :: FilePath
xcalib = findExecutable "xcalib"

View File

@ -164,6 +164,8 @@ myKeys conf = Map.fromList $
, ((0, xF86XK_AudioLowerVolume), audioLowerVolume) , ((0, xF86XK_AudioLowerVolume), audioLowerVolume)
, ((0, xF86XK_AudioRaiseVolume), audioRaiseVolume) , ((0, xF86XK_AudioRaiseVolume), audioRaiseVolume)
, ((0, xF86XK_AudioMute), audioMute) , ((0, xF86XK_AudioMute), audioMute)
, ((_4, xK_Prior), forkFile Paths.xcalib ["-invert", "-alter"] Nothing)
] ]
where where
_4 = mod4Mask _4 = mod4Mask