From 45f2d6896b5928bc16ae37384a403679f349299b Mon Sep 17 00:00:00 2001 From: Anders Engstrom Date: Sun, 3 May 2009 21:50:26 +0200 Subject: 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 --- XMonad/Layout/ThreeColumns.hs | 6 +++--- 1 file changed, 3 insertions(+), 3 deletions(-) (limited to 'XMonad/Layout') 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 ) -- cgit v1.2.3