diff options
| author | Michael G. Sloan <mgsloan@gmail.com> | 2007-07-29 05:24:07 +0200 |
|---|---|---|
| committer | Michael G. Sloan <mgsloan@gmail.com> | 2007-07-29 05:24:07 +0200 |
| commit | ee89914cd2fe1d99102893428271168d926abc43 (patch) | |
| tree | c902f9fab5091d5dead038709c44179e7e4885f5 /FlexibleManipulate.hs | |
| parent | 966b3694069cf6365faac48daf672fd09d7a683d (diff) | |
| download | XMonadContrib-ee89914cd2fe1d99102893428271168d926abc43.tar.gz XMonadContrib-ee89914cd2fe1d99102893428271168d926abc43.tar.xz XMonadContrib-ee89914cd2fe1d99102893428271168d926abc43.zip | |
Fix warnings in FlexibleManipulate (Sorry!)
darcs-hash:20070729032407-0d649-88391148f42be727b79f7a12274192d512e1c4f0.gz
Diffstat (limited to '')
| -rw-r--r-- | FlexibleManipulate.hs | 3 |
1 files changed, 2 insertions, 1 deletions
diff --git a/FlexibleManipulate.hs b/FlexibleManipulate.hs index 13682c0..48f9cc7 100644 --- a/FlexibleManipulate.hs +++ b/FlexibleManipulate.hs @@ -24,7 +24,6 @@ import XMonad import Operations import Graphics.X11.Xlib import Graphics.X11.Xlib.Extras -import Foreign.C.Types -- $usage -- Add this import to your Config.hs file: @@ -47,6 +46,8 @@ import Foreign.C.Types -- a value between 0 and 1 indicating position, and return a value indicating -- the corresponding position if plain Flex.linear was used. +discrete, linear, resize, position :: Double -> Double + discrete x | x < 0.33 = 0 | x > 0.66 = 1 | otherwise = 0.5 |