From fa52edb695f76911d08ade8f8e55be89bf6cc890 Mon Sep 17 00:00:00 2001 From: Baitinq Date: Tue, 5 Jul 2022 18:34:34 +0200 Subject: Xmonad: Added cycling layout functionality --- dotfiles/xmonad.hs | 3 +++ 1 file changed, 3 insertions(+) (limited to 'dotfiles/xmonad.hs') diff --git a/dotfiles/xmonad.hs b/dotfiles/xmonad.hs index 409e8dd..5e60baf 100644 --- a/dotfiles/xmonad.hs +++ b/dotfiles/xmonad.hs @@ -45,6 +45,8 @@ import XMonad.Actions.WorkspaceNames import XMonad.Hooks.StatusBar import XMonad.Hooks.StatusBar.PP +import XMonad.Actions.CycleWS + ------------------------------------------------------------------------ -- Workspaces -- The default number of workspaces (virtual screens) and their names. @@ -135,6 +137,7 @@ myCommands = , ("swap-with-master" , windows W.swapMaster ) , ("togglefullscreen" , sendMessage $ Toggle FULL ) , ("next-layout" , sendMessage NextLayout ) + , ("cycle-workspace" , toggleWS ) , ("kill-window" , kill ) , ("quit" , io $ exitWith ExitSuccess ) , ("restart" , spawn "xmonad --recompile; xmonad --restart" ) -- cgit 1.4.1