ThreeColMid - Swap slave window positions

Ignore-this: f2673e83386bc0e5d398d4e875537cc8
This patch will swap the positions of the two slave windows and this will result in a more intuitive window order. When using focusDown beginning in the master pane we will move in the following graphical order 2->3->1->2->3 instead of 2->1->3->2->1. This is backwards from what is expected.

The small drawback is that increasing from 2 to 3 windows (and therefore also columns) will behave in a less intuitive way. The window in the right column will jump to the left of the screen.

I think that it is a good idea to make this change since I rely a lot on the window order but people using WindowNavigation may be of a different opinion.

An alternative is to add an option to select in what way to behave, but that could be overkill... I leave it up to discussion and devs to decide.

darcs-hash:20090503195026-8978f-673fda48f46139930efe4cc0fd19f8777ffeed1b.gz

1 files changed, 3 insertions, 3 deletions

diff --git a/XMonad/Layout/ThreeColumns.hs b/XMonad/Layout/ThreeColumns.hs
index 4140537..ae33f33 100644
--- a/XMonad/Layout/ThreeColumns.hs
+++ b/XMonad/Layout/ThreeColumns.hs
@@ -92,9 +92,9 @@ tile3 middle f r nmaster n
 split3HorizontallyBy :: Bool -> Rational -> Rectangle -> (Rectangle, Rectangle, Rectangle)
 split3HorizontallyBy middle f (Rectangle sx sy sw sh) =
     if middle
-    then ( Rectangle (sx + fromIntegral r2w) sy r1w sh
-         , Rectangle sx sy r2w sh
-         , Rectangle (sx + fromIntegral r2w + fromIntegral r1w) sy r3w sh )
+    then ( Rectangle (sx + fromIntegral r3w) sy r1w sh
+         , Rectangle (sx + fromIntegral r3w + fromIntegral r1w) sy r2w sh
+         , Rectangle sx sy r3w sh )
     else ( Rectangle sx sy r1w sh
          , Rectangle (sx + fromIntegral r1w) sy r2w sh
          , Rectangle (sx + fromIntegral r1w + fromIntegral r2w) sy r3w sh )