diff options
author | joachim.fasting <joachim.fasting@gmail.com> | 2007-06-18 16:32:34 +0200 |
---|---|---|
committer | joachim.fasting <joachim.fasting@gmail.com> | 2007-06-18 16:32:34 +0200 |
commit | cd0f005b761fdf4020b4c32e77085b510428296b (patch) | |
tree | 47af56dd5bcba509f52b9591655c9b0c1b35d8e1 /LayoutHints.hs | |
parent | 93461b11c92f9129041f7ef973577f364f785d48 (diff) | |
download | XMonadContrib-cd0f005b761fdf4020b4c32e77085b510428296b.tar.gz XMonadContrib-cd0f005b761fdf4020b4c32e77085b510428296b.tar.xz XMonadContrib-cd0f005b761fdf4020b4c32e77085b510428296b.zip |
LayoutHints.hs: add usage thingie for Haddock.
darcs-hash:20070618143234-ea16c-cdc937fbf718f558e514f0881ab0951ccbfe918e.gz
Diffstat (limited to '')
-rw-r--r-- | LayoutHints.hs | 12 |
1 files changed, 8 insertions, 4 deletions
diff --git a/LayoutHints.hs b/LayoutHints.hs index 2115ff4..61aa6d8 100644 --- a/LayoutHints.hs +++ b/LayoutHints.hs @@ -11,10 +11,10 @@ -- Make layouts respect size hints. ----------------------------------------------------------------------------- -module XMonadContrib.LayoutHints ( layoutHints ) where - --- to use: --- defaultLayouts = [ layoutHints tiled, layoutHints $ mirror tiled , full ] +module XMonadContrib.LayoutHints ( + -- * usage + -- $ usage + layoutHints) where import Operations ( applySizeHints, D ) import Graphics.X11.Xlib @@ -22,6 +22,10 @@ import Graphics.X11.Xlib.Extras ( getWMNormalHints ) import {-#SOURCE#-} Config (borderWidth) import XMonad hiding ( trace ) +-- $ usage +-- > import XMonadContrib.LayoutHints +-- > defaultLayouts = [ layoutHints tiled , layoutHints $ mirror tiled ] + -- | Expand a size by the given multiple of the border width. The -- multiple is most commonly 1 or -1. adjBorders :: Dimension -> D -> D |