From 6c6ef62994bf192812420d7ac4d063764d69b38f Mon Sep 17 00:00:00 2001 From: Adam Vogt Date: Mon, 5 Apr 2010 20:40:20 +0200 Subject: prettier haddock markup for L.NoBorders Ignore-this: 1a9862e6e7ec0e965201a65a68314680 darcs-hash:20100405184020-1499c-bf8707ca6f0387e0c3960a5c07b67e7940a79e25.gz --- XMonad/Layout/NoBorders.hs | 12 ++++++------ 1 file changed, 6 insertions(+), 6 deletions(-) (limited to 'XMonad') diff --git a/XMonad/Layout/NoBorders.hs b/XMonad/Layout/NoBorders.hs index d67d3ea..80d6fc1 100644 --- a/XMonad/Layout/NoBorders.hs +++ b/XMonad/Layout/NoBorders.hs @@ -128,11 +128,11 @@ instance (Read p, Show p, SetsAmbiguous p) => LayoutModifier (ConfigurableBorder -- -- > layoutHook = lessBorders (Combine Difference Screen OnlyFloat) (Tall 1 0.5 0.03 ||| ... ) -- --- To get the same result as smartBorders: +-- To get the same result as 'smartBorders': -- -- > layoutHook = lessBorders (Combine Never) (Tall 1 0.5 0.03 ||| ...) -- --- This indirect method is required to keep the Read and Show for +-- This indirect method is required to keep the 'Read' and 'Show' for -- ConfigurableBorder so that xmonad can serialize state. class SetsAmbiguous p where hiddens :: p -> WindowSet -> Maybe (W.Stack Window) -> [(Window, Rectangle)] -> [Window] @@ -172,7 +172,7 @@ instance SetsAmbiguous Ambiguity where -- | In order of increasing ambiguity (less borders more frequently), where -- subsequent constructors add additional cases where borders are not drawn -- than their predecessors. These behaviors make most sense with with multiple --- screens: for single screens, Never or 'smartBorders' makes more sense. +-- screens: for single screens, 'Never' or 'smartBorders' makes more sense. data Ambiguity = Combine With Ambiguity Ambiguity -- ^ This constructor is used to combine the -- borderless windows provided by the @@ -194,7 +194,7 @@ data Ambiguity = Combine With Ambiguity Ambiguity -- | Used to indicate to the 'SetsAmbiguous' instance for 'Ambiguity' how two -- lists should be combined. -data With = Union -- ^ Combine with Data.List.union - | Difference -- ^ Combine with Data.List.\\ - | Intersection -- ^ Combine with Data.List.intersect +data With = Union -- ^ uses 'Data.List.union' + | Difference -- ^ uses 'Data.List.\\' + | Intersection -- ^ uses 'Data.List.intersect' deriving (Read, Show) -- cgit v1.2.3