diff options
author | Don Stewart <dons@galois.com> | 2008-04-27 21:12:47 +0200 |
---|---|---|
committer | Don Stewart <dons@galois.com> | 2008-04-27 21:12:47 +0200 |
commit | 74a8c5ede5dbe7752cbb108e1659ca8800ed8921 (patch) | |
tree | 8785e41fa580cc45da12c3e9084147be9cd946ab /XMonad | |
parent | 265921468cbde34f5ea6065739fb09b8a24efbc5 (diff) | |
download | XMonadContrib-74a8c5ede5dbe7752cbb108e1659ca8800ed8921.tar.gz XMonadContrib-74a8c5ede5dbe7752cbb108e1659ca8800ed8921.tar.xz XMonadContrib-74a8c5ede5dbe7752cbb108e1659ca8800ed8921.zip |
stricitfy some gap fields
darcs-hash:20080427191247-cba2c-678803461b066a68e6370f44d855ff445539da71.gz
Diffstat (limited to 'XMonad')
-rw-r--r-- | XMonad/Layout/Gaps.hs | 6 |
1 files changed, 3 insertions, 3 deletions
diff --git a/XMonad/Layout/Gaps.hs b/XMonad/Layout/Gaps.hs index a05bdbb..7734836 100644 --- a/XMonad/Layout/Gaps.hs +++ b/XMonad/Layout/Gaps.hs @@ -93,9 +93,9 @@ data Gaps a = Gaps GapSpec [Direction] -- | Messages which can be sent to a gap modifier. data GapMessage = ToggleGaps -- ^ Toggle all gaps. - | ToggleGap Direction -- ^ Toggle a single gap. - | IncGap Int Direction -- ^ Increase a gap by a certain number of pixels. - | DecGap Int Direction -- ^ Decrease a gap. + | ToggleGap !Direction -- ^ Toggle a single gap. + | IncGap !Int !Direction -- ^ Increase a gap by a certain number of pixels. + | DecGap !Int !Direction -- ^ Decrease a gap. deriving (Typeable) instance Message GapMessage |