summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorWill Thompson <will@willthompson.co.uk>2018-07-05 09:54:27 +0100
committerWill Thompson <will@willthompson.co.uk>2018-07-05 09:57:39 +0100
commit887a8b92580eaf50653162da19bdb8b648a62530 (patch)
tree84c126df0f916c4773ae1ac59e3460d61af2b942
parent61d6048b6e5a31f46db892c2c0c384d8099c95b0 (diff)
Renderer: don't shadow 'first'
-rw-r--r--Bustle/Renderer.hs6
1 files changed, 3 insertions, 3 deletions
diff --git a/Bustle/Renderer.hs b/Bustle/Renderer.hs
index 2f4c685..36dd580 100644
--- a/Bustle/Renderer.hs
+++ b/Bustle/Renderer.hs
@@ -260,10 +260,10 @@ data RendererState =
initialBusState :: Set UniqueName
-> Double
-> BusState
-initialBusState ignore first =
+initialBusState ignore x =
BusState { apps = Map.empty
- , firstColumn = first
- , nextColumn = first
+ , firstColumn = x
+ , nextColumn = x
, columnsInUse = Set.empty
, pending = Map.empty
, bsIgnoredNames = ignore