From 99531235e8ce7b95f702ca2c7ef4363ba3af6f11 Mon Sep 17 00:00:00 2001
From: David Majnemer <david@thedeadfulldread.home>
Date: Fri, 26 Dec 2008 11:38:57 -0500
Subject: [PATCH] introducing smartBorders, it removes the (currently red)
 borders when only a single window is being displayed. Also, mod-b toggles the
 xmobar widget view

---
 xmonad.hs | 6 ++++--
 1 file changed, 4 insertions(+), 2 deletions(-)

diff --git a/xmonad.hs b/xmonad.hs
index ff5c9c0..93d87e2 100644
--- a/xmonad.hs
+++ b/xmonad.hs
@@ -2,6 +2,7 @@ import XMonad
 
 import XMonad.Layout
 import XMonad.Layout.Grid
+import XMonad.Layout.NoBorders
 
 import XMonad.Hooks.DynamicLog
 import XMonad.Hooks.ManageDocks
@@ -33,12 +34,13 @@ main = do
 	xmproc <- spawnPipe "xmobar"
 	xmonad $ defaultConfig {
 		manageHook = manageDocks <+> manageHook defaultConfig,
-		layoutHook = avoidStruts  $  myLayoutHook,
+		layoutHook = avoidStruts  $  smartBorders $ myLayoutHook,
 		logHook    = dynamicLogWithPP $ xmobarPP {
 					ppOutput = hPutStrLn xmproc,
 					ppTitle = xmobarColor "green" ""
 					}
 		} `additionalKeys`
 			[
-				((mod1Mask, xK_o), shellPrompt defaultXPConfig { position = Top })
+				((mod1Mask, xK_o), shellPrompt defaultXPConfig { position = Top }),
+				((mod1Mask, xK_b), sendMessage ToggleStruts)
 			]