From d071db1afa7c0792d9f3d8a705ddca83653841d6 Mon Sep 17 00:00:00 2001
From: Leon Kowarschick <lkowarschick@gmail.com>
Date: Sat, 20 Jun 2020 14:31:37 +0200
Subject: [PATCH] Aasdf

---
 files/.xmonad/.stack-work/stack.sqlite3 | Bin 327680 -> 327680 bytes
 files/.xmonad/lib/Config.hs             |   8 ++++++--
 files/.xmonad/lib/WindowSwallowing.hs   |   4 ++--
 3 files changed, 8 insertions(+), 4 deletions(-)

diff --git a/files/.xmonad/.stack-work/stack.sqlite3 b/files/.xmonad/.stack-work/stack.sqlite3
index 39b91a1ee026f34f4a457ee193dba019ec748fab..d9b2a7daac8dfcbfdf53f932580b16104c65da2b 100644
GIT binary patch
delta 214
zcmZo@5NT)-nIO$*F;T{u(PCpl$_Fk6#w84ilDQl$wbKo`7&Y0Oav3>+0@EG4SoE89
zKep?BWCUWS?YbYCZ}JIUXW--Ek>Jwcux0aPiDXJ+xIS4?pqGpBFhjj$BRA9#4bEmB
z4=%9C<bqFn)9o2q_@{F+vII_!`}}Kr1{2G?S}r99J`o-b4ka$j&58mqS-1aeW%<g;
x%fP_o&Cq0@-pI`fagRDzi-<QjL<neB*z^snn0=@3?qDebn)P$LRTs;#QUEMfLJ|M~

delta 200
zcmZo@5NT)-nIO$5I8nx#QE+2I$_Gxyr3{IZxg0I^(+#;8wb+|-899Lh(;d55^qX}*
zw(EXm1Y)M`x*wTu@(CSg;N#(u;L_l*W%Fc-WJ+T=JXukohl}wDL%n1pH`EYO&SnJ<
zF0jaC#~*sr`50LeHrsyXW!#?5#4^8@i;sa%ghzvekIQniqQFbm?LS*tzA{dJ@Lz$e
rMZ=q$p~*hIksGLS;dK5`X7=fKmN6?$|JK3c4K#v}al3UF%h6H*3VJ?s

diff --git a/files/.xmonad/lib/Config.hs b/files/.xmonad/lib/Config.hs
index 98c6698..59e626c 100644
--- a/files/.xmonad/lib/Config.hs
+++ b/files/.xmonad/lib/Config.hs
@@ -23,7 +23,9 @@ import qualified XMonad.Util.ExtensibleState as XS
 import qualified Rofi
 import qualified DescribedSubmap
 import qualified TiledDragging
-import qualified WindowSwallowing
+--import qualified WindowSwallowing
+
+import XMonad.Hooks.WindowSwallowing as WindowSwallowing
 
 
 import Data.Foldable                  ( for_ )
@@ -60,6 +62,7 @@ import XMonad.Layout.ThreeColumns
 import XMonad.Layout.ResizableThreeColumns
 import XMonad.Layout.WindowSwitcherDecoration
 import XMonad.Layout.DraggingVisualizer
+--import XMonad.Layout.Hidden as Hidden
 
 import           XMonad.Util.EZConfig           ( additionalKeysP
                                                 , removeKeysP
@@ -181,6 +184,7 @@ myLayout = avoidStruts
          $ ToggleLayouts.toggleLayouts (rename "Tabbed" . makeTabbed . spacingAndGaps $ ResizableTall 1 (3/100) (1/2) [])
          $ MTog.mkToggle1 WINDOWDECORATION
          $ draggingVisualizer
+         -- $ Hidden.hiddenWindows
          $ layoutHintsToCenter
          $ layouts
   where
@@ -518,7 +522,7 @@ main = do
 -- }}}
 
 
-mySwallowEventHook = WindowSwallowing.swallowEventHook ([className =? "Alacritty", className =? "Termite", className =? "Thunar"]) ([return True])
+mySwallowEventHook = WindowSwallowing.swallowEventHook [className =? "Alacritty", className =? "Termite", className =? "Thunar"] [return True]
 
 
 activateWindowEventHook :: Event -> X All
diff --git a/files/.xmonad/lib/WindowSwallowing.hs b/files/.xmonad/lib/WindowSwallowing.hs
index 410c316..c5b862a 100644
--- a/files/.xmonad/lib/WindowSwallowing.hs
+++ b/files/.xmonad/lib/WindowSwallowing.hs
@@ -29,7 +29,7 @@ swallowEventHook parentQueries childQueries event = do
         oldFloating          <- XS.gets floatingBeforeClosing
         case (maybeSwallowedParent, maybeOldStack) of
           (Just parent, Just oldStack) -> do
-            Hidden.popHiddenWindow parent
+            --Hidden.popHiddenWindow parent
             windows
               (\ws ->
                 updateCurrentStack
@@ -58,7 +58,7 @@ swallowEventHook parentQueries childQueries event = do
                   . copyFloatingState parentWindow childWindow
                   )
                 XS.modify (addSwallowedParent parentWindow childWindow)
-                Hidden.hideWindow parentWindow
+                --Hidden.hideWindow parentWindow
             _ -> return ()
           return ()
     _ -> return ()