From a448468a8dec7f89141147fc94fdd7a855887a17 Mon Sep 17 00:00:00 2001 From: Max Hohlfeld Date: Wed, 16 Aug 2023 21:24:11 +0200 Subject: [PATCH] fix: WIP order of spawned windows in topic space --- roles/xmonad/files/xmonad_qwerty.hs | 4 +++- 1 file changed, 3 insertions(+), 1 deletion(-) diff --git a/roles/xmonad/files/xmonad_qwerty.hs b/roles/xmonad/files/xmonad_qwerty.hs index eef5ce6..2802928 100644 --- a/roles/xmonad/files/xmonad_qwerty.hs +++ b/roles/xmonad/files/xmonad_qwerty.hs @@ -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