From 1ec36de78fee05455ff83b067ffb63c356f62a4a Mon Sep 17 00:00:00 2001
From: Don Stewart <dons@galois.com>
Date: Fri, 26 Oct 2007 22:45:10 +0000
Subject: [PATCH] add more details on using smartBorders

---
 NoBorders.hs | 7 +++++++
 1 file changed, 7 insertions(+)

diff --git a/NoBorders.hs b/NoBorders.hs
index f9395f6c..f9a97510 100644
--- a/NoBorders.hs
+++ b/NoBorders.hs
@@ -43,6 +43,7 @@ import Data.List ((\\))
 -- borders
 --
 -- > layouts = [ Layout (noBorders Full), ... ]
+-- 
 
 -- %import XMonadContrib.NoBorders
 -- %layout -- prepend noBorders to default layouts above to remove their borders, like so:
@@ -95,5 +96,11 @@ instance LayoutModifier SmartBorder Window where
         ws = map fst wrs
         singleton = null . drop 1
 
+--
+-- | You can cleverly set no borders on a range of layouts, using a
+-- layoutHook like so:
+--
+-- > layoutHook = Layout $ smartBorders $ Select layouts
+--
 smartBorders :: LayoutClass l a => l a -> ModifiedLayout SmartBorder l a
 smartBorders = ModifiedLayout (SmartBorder [])