diff options
| author | Adrian Kummerlaender | 2018-07-04 13:28:44 +0200 |
|---|---|---|
| committer | Adrian Kummerlaender | 2018-07-04 13:28:44 +0200 |
| commit | 76cb1ea2e2c8a7100e8d6086cb721a3a737c6993 (patch) | |
| tree | ca0752249b3e811291359f95b18711e00784122b /gui/conf/xmonad.hs | |
| parent | accc8d489a54489f757cd10eb128e9a8c1042d9c (diff) | |
| download | nixos_home-76cb1ea2e2c8a7100e8d6086cb721a3a737c6993.tar nixos_home-76cb1ea2e2c8a7100e8d6086cb721a3a737c6993.tar.gz nixos_home-76cb1ea2e2c8a7100e8d6086cb721a3a737c6993.tar.bz2 nixos_home-76cb1ea2e2c8a7100e8d6086cb721a3a737c6993.tar.lz nixos_home-76cb1ea2e2c8a7100e8d6086cb721a3a737c6993.tar.xz nixos_home-76cb1ea2e2c8a7100e8d6086cb721a3a737c6993.tar.zst nixos_home-76cb1ea2e2c8a7100e8d6086cb721a3a737c6993.zip | |
Disable GTK3 menu bar window dragging
…this was a _joy_ to debug. Who would have thought that the GTK3 default interferred with window management to that extend.
Diffstat (limited to 'gui/conf/xmonad.hs')
| -rw-r--r-- | gui/conf/xmonad.hs | 11 |
1 files changed, 5 insertions, 6 deletions
diff --git a/gui/conf/xmonad.hs b/gui/conf/xmonad.hs index d451913..9354c6d 100644 --- a/gui/conf/xmonad.hs +++ b/gui/conf/xmonad.hs @@ -73,7 +73,7 @@ scratchpads = [ NS "terminal" "kitty --class=scratchterm" (className =? "scratch , NS "messaging" "telegram-desktop" (className =? "TelegramDesktop") (customFloating sideBarRight) ] -keybindings = +customKeybindings = -- xmonad session control [ ("C-M1-<Escape>" , io (exitWith ExitSuccess)) , ("C-M1-<Backspace>" , spawn "xmonad --restart") @@ -126,8 +126,7 @@ keybindings = , ("M-c <Down>" , spawn "amixer sset Master 10%-") , ("M-c m" , spawn "amixer sset Master toggle") ] -mousebindings :: XConfig Layout -> M.Map (KeyMask, Button) (Window -> X ()) -mousebindings (XConfig {XMonad.modMask = modMask}) = M.fromList +customMousebindings (XConfig {XMonad.modMask = modMask}) = M.fromList [ ((modMask .|. shiftMask, button1), \w -> XMonad.focus w >> mouseMoveWindow w) , ((modMask .|. shiftMask, button3), \w -> XMonad.focus w >> mouseResizeWindow w) ] @@ -153,9 +152,9 @@ main = xmonad $ ewmh , borderWidth = 3 , normalBorderColor = "#161616" , focusedBorderColor = "#909636" - , keys = \c -> mkKeymap c keybindings - , mouseBindings = mousebindings - , startupHook = return () >> checkKeymap def keybindings + , keys = \c -> mkKeymap c customKeybindings + , mouseBindings = customMousebindings + , startupHook = return () >> checkKeymap def customKeybindings , handleEventHook = customEventHook , manageHook = customManageHook , logHook = customLogHook |