diff options
| author | Don Stewart <dons@galois.com> | 2007-10-27 00:45:10 +0200 |
|---|---|---|
| committer | Don Stewart <dons@galois.com> | 2007-10-27 00:45:10 +0200 |
| commit | 9a26658d445e98d4c9ecef000b62c37da9835fe5 (patch) | |
| tree | a13025cb093b4546c2fdc54d83475e247f920563 /NoBorders.hs | |
| parent | ff91f3f0c0984113e5b4a90f29969f7913780268 (diff) | |
| download | XMonadContrib-9a26658d445e98d4c9ecef000b62c37da9835fe5.tar.gz XMonadContrib-9a26658d445e98d4c9ecef000b62c37da9835fe5.tar.xz XMonadContrib-9a26658d445e98d4c9ecef000b62c37da9835fe5.zip | |
add more details on using smartBorders
darcs-hash:20071026224510-cba2c-a3b79ebb8558a577e9bf59f1a5c77a6a8006c6bd.gz
Diffstat (limited to '')
| -rw-r--r-- | NoBorders.hs | 7 |
1 files changed, 7 insertions, 0 deletions
diff --git a/NoBorders.hs b/NoBorders.hs index f9395f6..f9a9751 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 []) |