From 30c6cf7152ac88c49527a84f6e95f0731b64f03a Mon Sep 17 00:00:00 2001 From: Jose Antonio Ortega Ruiz Date: Thu, 30 Aug 2012 01:37:44 +0200 Subject: Revert "Add '-d' for dockapp mode" This reverts commit cae6f2bc049d4b7ed57a7a18a828bc4ea35df4aa, until we find a reason why it's causing high CPU consumption in the X server. --- src/Window.hs | 2 -- 1 file changed, 2 deletions(-) (limited to 'src/Window.hs') diff --git a/src/Window.hs b/src/Window.hs index d08e445..9b0c506 100644 --- a/src/Window.hs +++ b/src/Window.hs @@ -66,7 +66,6 @@ setPosition p rs ht = BottomSize a i ch -> (Rectangle (ax a i) (ny' ch) (nw i) (mh ch), True) Static cx cy cw ch -> (Rectangle (fi cx) (fi cy) (fi cw) (fi ch), True) OnScreen _ p'' -> setPosition p'' [scr] ht - Docked -> (Rectangle rx ry rw h, False) where (scr@(Rectangle rx ry rw rh), p') = case p of OnScreen i x -> (fromMaybe (head rs) $ safeIndex i rs, x) @@ -119,7 +118,6 @@ getStrutValues r@(Rectangle x y w h) p rwh = BottomW _ _ -> [0, 0, 0, sb, 0, 0, 0, 0, 0, 0, nx, nw] BottomSize {} -> [0, 0, 0, sb, 0, 0, 0, 0, 0, 0, nx, nw] Static {} -> getStaticStrutValues p rwh - Docked -> getStaticStrutValues p rwh where st = fi y + fi h sb = rwh - fi y nx = fi x -- cgit v1.2.3