hektor
/
dots
1
0
Fork 0
Code Issues Pull Requests Packages Projects Releases Wiki Activity

Add magnifier keybindings

master
Hektor Misplon 2022-09-24 16:18:01 +02:00
parent ba751e369f
commit 668b4c7e27
1 changed files with 6 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

8
.xmonad/xmonad.hs
View File

@ -4,6 +4,7 @@ import XMonad.Hooks.ManageDocks
import XMonad.Layout.NoBorders (smartBorders)
import XMonad.Layout.Magnifier
import qualified XMonad.Layout.Magnifier as Mag (MagnifyMsg (..))
import XMonad.Layout.Spacing
import XMonad.Layout.Tabbed (Theme (..), shrinkText,
tabbedAlways)
@ -112,8 +113,11 @@ myKeysP = [
, ("M-S-b", spawn "firefox --fullscreen")
-- Magnify window using arrow keys
, ("M-<Up>", sendMessage MagnifyMore)
, ("M-<Down>", sendMessage MagnifyLess)
, ("M-=", sendMessage MagnifyMore >> sendMessage Mag.ToggleOn)
, ("M--", sendMessage MagnifyLess >> sendMessage Mag.ToggleOn)
-- Reset magnification
, ("M-S-=", sendMessage Mag.ToggleOff)
]
-- Keybindings to be removed