aboutsummaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
authorDon Stewart <dons@galois.com>2007-11-08 00:06:01 +0100
committerDon Stewart <dons@galois.com>2007-11-08 00:06:01 +0100
commit04c3480fd2c80837a2beeae5b3e2459479f09242 (patch)
tree5f97bd35a779653c852bc85afc65a71f570a7cc5
parente7353edf54ada68836a736b0addef66ae8897f89 (diff)
downloadXMonadContrib-04c3480fd2c80837a2beeae5b3e2459479f09242.tar.gz
XMonadContrib-04c3480fd2c80837a2beeae5b3e2459479f09242.tar.xz
XMonadContrib-04c3480fd2c80837a2beeae5b3e2459479f09242.zip
over pararenthesised arty fibonacci
darcs-hash:20071107230601-cba2c-ebfff275275980cc4260f714c452e371d76a8cae.gz
-rw-r--r--XMonad/Layout/Spiral.hs2
1 files changed, 1 insertions, 1 deletions
diff --git a/XMonad/Layout/Spiral.hs b/XMonad/Layout/Spiral.hs
index ae82ad9..b865f4d 100644
--- a/XMonad/Layout/Spiral.hs
+++ b/XMonad/Layout/Spiral.hs
@@ -40,7 +40,7 @@ import XMonad.StackSet ( integrate )
-- %layout , Layout $ spiral (1 % 1)
fibs :: [Integer]
-fibs = 1 : 1 : (zipWith (+) fibs (tail fibs))
+fibs = 1 : 1 : zipWith (+) fibs (tail fibs)
mkRatios :: [Integer] -> [Rational]
mkRatios (x1:x2:xs) = (x1 % x2) : mkRatios (x2:xs)