From b1c417b464f88878c702d568a6ba2f3a7135dff5 Mon Sep 17 00:00:00 2001
From: Martin Potier <martin.potier@marvid.fr>
Date: Thu, 15 Sep 2022 16:23:00 +0300
Subject: [PATCH] Changes

---
 lib/Projects.hs | 2 ++
 xmonad.hs       | 5 +++--
 2 files changed, 5 insertions(+), 2 deletions(-)

diff --git a/lib/Projects.hs b/lib/Projects.hs
index 1acf593..79f7932 100644
--- a/lib/Projects.hs
+++ b/lib/Projects.hs
@@ -90,8 +90,10 @@ projects =  [ adminProject "wrk-config"
             , workProject "nix-ansible-role"
             , workProject "nixos-modules"
             , workProject "nixpkgs"
+            , workProject "one-off-scripts"
             , workProject "planning-cloud"
             , workProject "rfcs"
+            , workProject "slog-agent"
             , workProject "sm-terraform"
             , workProject "time-tracking"
             , workProject "ugluk-ansible-role"
diff --git a/xmonad.hs b/xmonad.hs
index ea380c0..871aaba 100755
--- a/xmonad.hs
+++ b/xmonad.hs
@@ -47,13 +47,14 @@ layouts = toggleLayouts fullscreen    tiled
 -- For className, use the second value that xprop gives you.
 -------------- Here be the law of windows
 myManageHook = composeOne
-  [ className =? "Pavucontrol"        -?> doShift "music"
+  [ className =? "Gcr-prompter"       -?> doCenterFloat
+  , className =? "Pavucontrol"        -?> doShift "music"
   , className =? "Pinentry"           -?> doFloat
   , className =? "VirtualBox"         -?> doFloat
+  , className =? "gpclient"           -?> doTile <+> (doShift "VPN")
   , className =? "mpv"                -?> doFullFloat <+> (doShift "flims")
   , className =? "qemu-system-x86_64" -?> doFloat
   , className =? "qutebrowser"        -?> doShift "web"
-  , className =? "gpclient"           -?> doTile <+> (doShift "VPN")
   , isDialog                          -?> doCenterFloat
 
     -- Move transient windows to their parent: