Schwarztee/alkaa
1
0
Fork 0
Code Issues Pull Requests Packages Projects Releases Wiki Activity

fix: WIP order of spawned windows in topic space

Browse Source
This commit is contained in:
Max Hohlfeld 2023-08-16 21:24:11 +02:00
parent d5216a045d
commit a448468a8d
1 changed files with 3 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

4
roles/xmonad/files/xmonad_qwerty.hs
View File

@ -29,6 +29,7 @@ import XMonad.Prompt.FuzzyMatch (fuzzyMatch, fuzzySort)
import XMonad.Prompt.Shell (shellPrompt, unsafePrompt)
import Text.Regex.Posix ((=~))
import Control.Concurrent (threadDelay)
-- variables
myTerminal = "alacritty"
@ -67,7 +68,7 @@ topicItems =
, noAction "4" "~/"
, noAction "5" "~/"
, TI "recipes" "~/projekte/recipes" (switchToLayout "Programming" *> spawnShellAndExecute "hugo server" *> proc (inProgram myBrowser) *> spawnEditor)
, TI "alkaa" "~/projekte/alkaa" (switchToLayout "Programming" *> spawnShell *> spawnEditor)
, TI "alkaa" "~/projekte/alkaa" (switchToLayout "Programming" *> spawnShell *> liftIO(threadDelay 500000) *> spawnEditor)
, TI "steam" "~" (switchToLayout "Steam" *> spawn "steam")
, TI "game" "~" (switchToLayout "Full")
, TI "micro" "~/projekte/microcontroller" (switchToLayout "Programming" *> spawnShell *> spawnEditor)
@ -232,6 +233,7 @@ myManageHook = composeAll . concat $
, [ (className =? "steam" <||> className =? "steamwebhelper") --> doShift "steam" ]
, [ (title *!? "Friends List" <||> title *!? "News" ) --> doF W.swapDown ]
, [ title =? "Steam" --> doF W.shiftMaster ]
, [ title =? "notificationtoasts_2_desktop" --> doFloat ]
, [ title =? t <&&> title *!? t --> doShift "game" | t <- myGames ]
-- float specific classes