diff options
Diffstat (limited to 'lib')
| -rw-r--r-- | lib/xmonad.hs | 17 |
1 files changed, 12 insertions, 5 deletions
diff --git a/lib/xmonad.hs b/lib/xmonad.hs index b3cdffd..75dd652 100644 --- a/lib/xmonad.hs +++ b/lib/xmonad.hs @@ -40,6 +40,7 @@ import qualified XMonad.StackSet as W import XMonad.Util.CustomKeys (customKeys) import XMonad.Util.EZConfig (additionalKeys) import XMonad.Util.Scratchpad +import XMonad.Util.NamedScratchpad -- Colors data Colors = Colors @@ -94,7 +95,12 @@ myManageHook = manageDocks <+> scratchHook <+> (shouldFloat --> doFullFloat) <+> -- todo: use urxvtc with daemon termName = "/home/ben/.nix-profile/bin/urxvt" -transparentTerm = "urxvt -depth 32 -bg rgba:0000/0000/0000/4444 -fg '[80]white'" +transparentTerm = termName <> " -depth 32 -bg rgba:0000/0000/0000/4444" + +scratchpads = [ + NS "pavucontrol" "pavucontrol" (className =? "Pavucontrol") + (customFloating $ W.RationalRect (1/4) (1/4) (2/4) (2/4)) + ] insKeys :: XConfig l -> [((KeyMask, KeySym), X ())] insKeys conf@(XConfig {modMask = modMask}) = @@ -103,8 +109,9 @@ insKeys conf@(XConfig {modMask = modMask}) = ((modMask, xK_o), spawn "rofi -sidebar-mode -show run"), ((modMask, xK_n), spawn "rofi -sidebar-mode -show window"), ((modMask, xK_u), spawn "rofi -show calc -modi calc -no-show-match -no-sort"), - ((modMask, xK_s), scratchpadSpawnActionTerminal transparentTerm), - ((modMask, xK_h), spawn transparentTerm), + ((modMask, xK_h), scratchpadSpawnActionTerminal transparentTerm), + ((modMask .|. shiftMask, xK_p), namedScratchpadAction scratchpads "pavucontrol"), + -- ((modMask, xK_h), spawn transparentTerm), -- refresh display via autorandr ( (modMask, xK_r), spawn $ "autorandr --cycle" @@ -139,9 +146,9 @@ addSpace :: l a -> ModifiedLayout Spacing l a addSpace = spacingRaw False - (Border 10 10 10 10) + (Border 15 15 15 15) True - (Border 10 10 10 10) + (Border 15 15 15 15) True myTabCfg theme = |