aboutsummaryrefslogtreecommitdiffstats
path: root/XMonad/Layout
diff options
context:
space:
mode:
authorDon Stewart <dons@galois.com>2008-03-17 23:47:58 +0100
committerDon Stewart <dons@galois.com>2008-03-17 23:47:58 +0100
commit7c809193e7c00cbb1b72661a2592cd40e3755a97 (patch)
tree90090cc566e56df437a85edfd0c6cbbcf2b5d727 /XMonad/Layout
parentc5df79aa78b334c08394c1bd8255b38d3664bc10 (diff)
downloadXMonadContrib-7c809193e7c00cbb1b72661a2592cd40e3755a97.tar.gz
XMonadContrib-7c809193e7c00cbb1b72661a2592cd40e3755a97.tar.xz
XMonadContrib-7c809193e7c00cbb1b72661a2592cd40e3755a97.zip
tabs
darcs-hash:20080317224758-cba2c-ff646ade8614b938a761f43fd3c61f824437b4f2.gz
Diffstat (limited to 'XMonad/Layout')
-rw-r--r--XMonad/Layout/SimpleFloat.hs4
1 files changed, 2 insertions, 2 deletions
diff --git a/XMonad/Layout/SimpleFloat.hs b/XMonad/Layout/SimpleFloat.hs
index acf355d..b53b4ab 100644
--- a/XMonad/Layout/SimpleFloat.hs
+++ b/XMonad/Layout/SimpleFloat.hs
@@ -50,14 +50,14 @@ import XMonad.Layout.WindowArranger
--
-- This version is decorated with the 'SimpleDecoration' style.
simpleFloat :: Eq a => ModifiedLayout (Decoration SimpleDecoration DefaultShrinker)
- (ModifiedLayout MouseResize (ModifiedLayout WindowArranger SimpleFloat)) a
+ (ModifiedLayout MouseResize (ModifiedLayout WindowArranger SimpleFloat)) a
simpleFloat = decoration shrinkText defaultTheme (Simple False) (mouseResize $ windowArrangeAll $ SF 20)
-- | Same as 'simpleFloat', but with the possibility of setting a
-- custom shrinker and a custom theme.
simpleFloat' :: (Eq a, Shrinker s) => s -> Theme ->
ModifiedLayout (Decoration SimpleDecoration s)
- (ModifiedLayout MouseResize (ModifiedLayout WindowArranger SimpleFloat)) a
+ (ModifiedLayout MouseResize (ModifiedLayout WindowArranger SimpleFloat)) a
simpleFloat' s c = decoration s c (Simple False) (mouseResize $ windowArrangeAll $ SF (decoHeight c))
data SimpleFloat a = SF Dimension deriving (Show, Read)