More logical order for xmonad new window

1 files changed, 17 insertions, 10 deletions

diff --git a/xmonad.hs b/xmonad.hs
index 5535420..5420664 100644
--- a/xmonad.hs
+++ b/xmonad.hs
@@ -8,6 +8,9 @@ import XMonad.Util.EZConfig(additionalKeysP)
 -- Layouts
 import XMonad.Layout.NoBorders
 
+-- Hooks
+import XMonad.Hooks.InsertPosition
+
 
 main = do
     xmonad $ desktopConfig
@@ -19,20 +22,24 @@ main = do
         , focusedBorderColor = "#bbc5ff"
         , layoutHook         = myLayouts
         , startupHook        = myStartupHook
+        , manageHook         = myManageHook
         } `additionalKeysP` myKeys
 
-myLayouts = tiledBigMaster ||| Mirror tiledEven ||| noBorders Full
+myLayouts = tiledBigMaster        -- bigger master for code and smaller slave for compiling
+            ||| Mirror tiledEven  -- 50/50 horizontal split
+            ||| noBorders Full    -- disable borders for fullscreen layout
     where tiledBigMaster = Tall 1 (3 / 100) (3 / 5)
           tiledEven      = Tall 1 (3 / 100) (1 / 2)
 
-
 myStartupHook = do
-    spawnOnce "redshift -c /home/charles/.config/redshift.conf &"
-    spawnOnce "xinput disable 'ETPS/2 Elantech Touchpad' &"
-
-myKeys = [ ("<XF86AudioRaiseVolume>",  spawn "pulseaudio-ctl up")
-         , ("<XF86AudioLowerVolume>",  spawn "pulseaudio-ctl down")
-         , ("<XF86AudioMute>",         spawn "pulseaudio-ctl mute")
-         , ("<XF86MonBrightnessUp>",   spawn "xbacklight -inc 5")
-         , ("<XF86MonBrightnessDown>", spawn "xbacklight -dec 5")
+    spawnOnce "redshift -c /home/charles/.config/redshift.conf &"  -- start redshift
+    spawnOnce "xinput disable 'ETPS/2 Elantech Touchpad' &"        -- disable touchpad
+
+myManageHook = insertPosition End Newer  -- insert new window at the end of the current layout
+
+myKeys = [ ("<XF86AudioRaiseVolume>",  spawn "pulseaudio-ctl up")    -- volume up
+         , ("<XF86AudioLowerVolume>",  spawn "pulseaudio-ctl down")  -- volume down
+         , ("<XF86AudioMute>",         spawn "pulseaudio-ctl mute")  -- volume mute
+         , ("<XF86MonBrightnessUp>",   spawn "xbacklight -inc 5")    -- backlight up
+         , ("<XF86MonBrightnessDown>", spawn "xbacklight -dec 5")    -- backlight down
          ]