From d41bf82bb2d189fdebc7fa4958d2c01fada1afba Mon Sep 17 00:00:00 2001
From: toni <toni@devlap.local>
Date: Sun, 1 Mar 2015 01:16:45 +0100
Subject: - see prev commit

---
 configs/xmonad.hs | 8 +++++---
 1 file changed, 5 insertions(+), 3 deletions(-)

diff --git a/configs/xmonad.hs b/configs/xmonad.hs
index 9d0ae28..24f7e90 100644
--- a/configs/xmonad.hs
+++ b/configs/xmonad.hs
@@ -79,7 +79,7 @@ myManageHook = composeAll
 -- which denotes layout choice.
 --
 myLayout = avoidStruts (
-    Tall 1 (3/100) (1/2) ||| Mirror (Tall 1 (3/100) (1/2)) ||| Full ||| tabbed shrinkText myTabConfig)
+    Tall 2 (3/100) (2/5) ||| Mirror (Tall 1 (3/100) (1/2)) ||| Full ||| tabbed shrinkText myTabConfig)
 
 ------------------------------------------------------------------------
 -- Colors and borders
@@ -142,6 +142,8 @@ myKeys conf@(XConfig {XMonad.modMask = modMask}) = M.fromList $
   -- That is, take a screenshot of everything you see.
   , ((modMask .|. shiftMask, xK_p),
      spawn "xwd -out ~/screenshot.xwd; convert ~/screenshot.xwd ~/screenshot.jpg")
+  , ((modMask .|. shiftMask, xK_o),
+     spawn "xwd -root -out ~/screenshot_full.xwd; convert ~/screenshot_full.xwd ~/screenshot_full.jpg")
 
   -- Mute volume.
   , ((modMask .|. shiftMask, xK_m),
@@ -188,10 +190,10 @@ myKeys conf@(XConfig {XMonad.modMask = modMask}) = M.fromList $
      nextWS)
 
   , ((modMask, xK_Up),
-     shiftToNext)
+     windows W.focusUp)
 
   , ((modMask, xK_Down),
-     shiftToPrev)
+     windows W.focusDown)
 
   -- Move focus to the next window.
   , ((modMask, xK_Tab),
-- 
cgit v1.2.3