Some changes

lib/Projects.hs

@@ -13,6 +13,10 @@ projects =
             , projectStartHook = Just $ do safeSpawn "vim" ["-g"]
                                            safeSpawnProg "st"
             }
+  , Project { projectName = "accounting"
+            , projectDirectory = "~/accounting"
+            , projectStartHook = Just $ do safeSpawnProg "st"
+            }
   , Project { projectName = "flim"
             , projectDirectory = "/flims/rtorrent/download"
             , projectStartHook = Just $ do safeSpawnProg "st"
@@ -29,10 +33,6 @@ projects =
             , projectDirectory = "/tmp"
             , projectStartHook = Just $ do spawn "firefox"
             }
-  , Project { projectName = "Diablo"
-            , projectDirectory = "/tmp"
-            , projectStartHook = Just $ do spawn "/run/current-system/sw/bin/wine '/home/eeva/.wine/drive_c/Program Files/Battle.net/Battle.net Launcher.exe'"
-            }
   ]
 
 modify :: XConfig l -> XConfig l

xmonad.hs

@@ -34,16 +34,18 @@ 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 =? "Pinentry"           -?> doFloat
-  , className =? "Steam"              -?> doShift "steam"
-  , className =? "VirtualBox"         -?> doFloat
-  , className =? "csgo_linux64"       -?> doShift "csgo"
-  , className =? "mpv"                -?> doFullFloat <+> (doShift "flims")
-  , className =? "qemu-system-x86_64" -?> doFloat
-  , className =? "qutebrowser"        -?> doShift "web"
-  , isDialog                          -?> doCenterFloat
-  , isDialog                          -?> doCenterFloat
+  [ className =? "Pavucontrol"          -?> doShift "music"
+  , className =? "Pinentry"             -?> doFloat
+  , className =? "Steam"                -?> doShift "steam"
+  , className =? "VirtualBox"           -?> doFloat
+  , className =? "csgo_linux64"         -?> doShift "csgo"
+  , className =? "mpv"                  -?> doFullFloat <+> (doShift "flims")
+  , className =? "qemu-system-x86_64"   -?> doFloat
+  , className =? "qutebrowser"          -?> doShift "web"
+  , className =? "Wine System Tray"     -?> doShift "wine"
+  , className =? "Blizzard Battle.net"  -?> doShift "battlenet"
+  , isDialog                            -?> doCenterFloat
+  , isDialog                            -?> doCenterFloat
 
     -- Move transient windows to their parent:
   , transience