hunner/dotfiles
1
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity Actions

Updates for my old arch system

Browse source
This commit is contained in:
Hunter Haugen 2025-04-11 16:15:57 -07:00
parent 4bd342b207
commit ffc67ae3d7
Signed by: hunner
GPG key ID: EF99694AA599DDAD
5 changed files with 10 additions and 10 deletions
Download patch file Download diff file Expand all files Collapse all files

7
.xmonad/xmonad.hs
View file

@ -7,7 +7,6 @@
import XMonad hiding (Tall)
import System.Exit
import XMonad.Layout.Circle
import XMonad.Layout.HintedTile
import XMonad.Layout.MagicFocus
import XMonad.Layout.Magnifier
@ -114,9 +113,9 @@ mKeys = [ ("M-S-n" , sendMessage MirrorShrink ) -- Expand current window
-- ++ -- mod-[1..9] %! Move window to Nth workspace that exists in alphabetical order
-- zip (map (("M-S-" ++) . show) [0..9]) (map (withNthWorkspace W.shift) [0..])
++ -- mod-{o,e,u} %! Switch to physical/Xinerama screens 0, 1, or 2
zip (map ("M-" ++) ["o","e","u"]) (map (\x -> screenWorkspace x >>= flip whenJust (windows . W.view)) [0..])
zip (map ("M-" ++) ["o","u","e"]) (map (\x -> screenWorkspace x >>= flip whenJust (windows . W.view)) [0..])
++ -- mod-shift-{o,e,u} %! Move client to screen 0, 1, or 2
zip (map ("M-S-" ++) ["o","e","u"]) (map (\x -> screenWorkspace x >>= flip whenJust (windows . W.shift)) [0..])
zip (map ("M-S-" ++) ["o","u","e"]) (map (\x -> screenWorkspace x >>= flip whenJust (windows . W.shift)) [0..])
where -- Make the mouse jump to the middle of the screen for gridselect
warpToCentre = gets (W.screen . W.current . windowset) >>= \x -> warpToScreen x 0.5 0.5
warpToCorner = gets (W.screen . W.current . windowset) >>= \x -> warpToScreen x 1.0 1.0
@ -165,7 +164,7 @@ gsConfig = def
-- Layouts:
--mLayout = smartBorders Full ||| tiled ||| hintedTile Wide ||| simplestFloat ||| Circle ||| magnifier Circle
mLayout = Mirror tiled ||| tiled ||| smartBorders Full ||| Circle ||| simplestFloat
mLayout = Mirror tiled ||| tiled ||| smartBorders Full ||| simplestFloat
where
-- default tiling algorithm partitions the screen into two panes
--tiled = Tall nmaster delta ratio