oignon: allow more output-net

[julm/julm-nix.git] / home-manager / profiles / xmonad / xmonad.hs

diff --git a/home-manager/profiles/xmonad/xmonad.hs b/home-manager/profiles/xmonad/xmonad.hs
index 3e1e7c99b01d68929b067d1c95c2879c2dfdbc11..8d85ee73c5430afb57a0af8e02fb20e1cc3d0fb4 100644 (file)
--- a/home-manager/profiles/xmonad/xmonad.hs
+++ b/home-manager/profiles/xmonad/xmonad.hs
@@ -45,8 +45,6 @@ import XMonad.Util.Run(spawnPipe)
 import XMonad.Util.SpawnOnce
 import qualified XMonad.StackSet as W
 
-doSink = doF . W.sink =<< ask
-
 myKeys
  conf@XConfig{XMonad.modMask} =
   Map.fromList $
@@ -61,7 +59,7 @@ myKeys
   , ((modMask, xK_BackSpace), spawn "caja")
 
   -- Lock the screen
-  , ((0, xK_Pause), spawn "xset s activate dpms force off")
+  , ((0, xK_Pause), spawn "systemctl --user start xss-lock.service; xset s activate dpms force off")
 
   -- Take a full screenshot
   , ((0, xK_Print), spawn "cd ~/img/cap && scrot --quality 42 '%Y-%m-%d_%H-%M-%S.png' && caja ~/img/cap")
@@ -69,9 +67,9 @@ myKeys
   , ((modMask, xK_Print), spawn "select-screenshot")
 
   -- Volume control
-  , ((0, 0x1008FF12), spawn "pactl -- set-sink-mute 0 toggle") -- XF88AudioMute
-  , ((0, 0x1008FF11), spawn "pactl -- set-sink-volume 0 -5%") -- XF86AudioLowerVolume
-  , ((0, 0x1008FF13), spawn "pactl -- set-sink-volume 0 +5%") -- XF86AudioRaiseVolume
+  , ((0, 0x1008FF12), spawn "pactl -- set-sink-mute @DEFAULT_SINK@ toggle") -- XF88AudioMute
+  , ((0, 0x1008FF11), spawn "pactl -- set-sink-volume @DEFAULT_SINK@ -5%") -- XF86AudioLowerVolume
+  , ((0, 0x1008FF13), spawn "pactl -- set-sink-volume @DEFAULT_SINK@ +5%") -- XF86AudioRaiseVolume
   -- Audio previous
   -- , ((0, 0x1008FF16), spawn "")
   -- Play/pause
@@ -235,17 +233,12 @@ isWindowSpaceVisible = do
   vs <- gets (map (W.tag . W.workspace) . W.visible . windowset)
   return (\w -> W.tag w `elem` vs)
 
-defaults xmproc _nScreens = ewmh $
+defaults xmproc _nScreens = docks $ ewmhFullscreen $ ewmh $
  azertyConfig
   { borderWidth        = 1
   , focusFollowsMouse  = True
   , focusedBorderColor = "#00b10b"
   , handleEventHook    = handleEventHook def
-                         <+> XMonad.Hooks.EwmhDesktops.fullscreenEventHook
-                         <+> XMonad.Layout.Fullscreen.fullscreenEventHook
-                         <+> docksEventHook
-                             -- causes new docks to appear immediately,
-                             -- instead of waiting for the next focus change.
   , keys               = myKeys
   , layoutHook         = smartBorders $
                          mkToggle (NOBORDERS ?? FULL ?? EOT) $ -- enable temporarily maximizing a window
@@ -335,6 +328,7 @@ defaults xmproc _nScreens = ewmh $
      , inactiveBorderColor = "#7C7C7C"
      , inactiveColor       = "#000000"
      , inactiveTextColor   = "#EEEEEE"
+     , fontName            = "xft:DejaVu Sans Mono:pixelsize=9:antialias=true"
      }
 
 --