From a2d664fbbbc2b8983c1e5c74dcdbba8bf06e27f5 Mon Sep 17 00:00:00 2001
From: Adrian Kummerlaender
Date: Mon, 17 Dec 2018 12:15:05 +0100
Subject: Reorder XMonad layouts

Binary space partition, tabbed and large framed layouts have proven themselves to be the most frequently used ones.
---
 gui/conf/xmonad.hs | 24 ++++++++++++------------
 1 file changed, 12 insertions(+), 12 deletions(-)

(limited to 'gui/conf/xmonad.hs')

diff --git a/gui/conf/xmonad.hs b/gui/conf/xmonad.hs
index 79c7ace..c1b40b7 100644
--- a/gui/conf/xmonad.hs
+++ b/gui/conf/xmonad.hs
@@ -57,29 +57,29 @@ customLayoutHook host = id
   . smartBorders
   . ModifiedLayout (hudMonitor host)
   . mkToggle (single NBFULL)
-  $ tabs ||| tiles ||| two ||| frame ||| bsp
+  $ bsp ||| tabs ||| frame ||| tiles ||| two
   where
+    bsp    = name "bsp"   $ borderResize (emptyBSP)
     tabs   = name "tabs"  $ tabbed shrinkText customTabTheme
-    tiles  = name "tiles" $ id
-                          . mkToggle (single REFLECTX)
-                          . mkToggle (single REFLECTY)
-                          $ multiCol [1, 2, 0] 1 delta (1/3)
-    two    = name "two"   $ TwoPane delta (1/2)
     frame  = name "frame" $ id
                           . mkToggle (single REFLECTX)
                           . mkToggle (single REFLECTY)
                           . reflectVert
                           $ OneBig (2/3) (4/5)
-    bsp    = name "bsp"   $ borderResize (emptyBSP)
+    tiles  = name "tiles" $ id
+                          . mkToggle (single REFLECTX)
+                          . mkToggle (single REFLECTY)
+                          $ multiCol [1, 2, 0] 1 delta (1/3)
+    two    = name "two"   $ TwoPane delta (1/2)
     delta  = 1/24
     name n = renamed [Replace n]
 
 -- layout names for layout selection dialog
-layoutNames = fromList [ ("0: Tabbed windows"          , "tabs")
-                       , ("1: Multi-column tiles"      , "tiles")
-                       , ("2: Two column stack"        , "two")
-                       , ("3: One large framed window" , "frame")
-                       , ("4: Binary space partition"  , "bsp") ]
+layoutNames = fromList [ ("0: Binary space partition"  , "bsp")
+                       , ("1: Tabbed windows"          , "tabs")
+                       , ("2: One large framed window" , "frame")
+                       , ("3: Multi-column tiles"      , "tiles")
+                       , ("4: Two column stack"        , "two") ]
 
 floatRectTop    h = S.RationalRect (1/20) 0      (18/20) h
 floatRectBottom h = S.RationalRect (1/20) (1-h)  (18/20) h
-- 
cgit v1.2.3