summaryrefslogtreecommitdiffstats
path: root/Operations.hs
diff options
context:
space:
mode:
authorSpencer Janssen <sjanssen@cse.unl.edu>2007-04-30 18:35:15 +0200
committerSpencer Janssen <sjanssen@cse.unl.edu>2007-04-30 18:35:15 +0200
commit8238c35c211b4bc6258958918653d267787f8b47 (patch)
treeb24dbb0c1d6e0b8fc2327c20e70c01d1a9be628d /Operations.hs
parent0f366aba734661ab6cc97ed368fe683d00fcc2d3 (diff)
downloadmetatile-8238c35c211b4bc6258958918653d267787f8b47.tar
metatile-8238c35c211b4bc6258958918653d267787f8b47.zip
Make border width configurable
darcs-hash:20070430163515-a5988-9dea5188c30830fd8b3135f7cb5beffd7b90dcb9
Diffstat (limited to 'Operations.hs')
-rw-r--r--Operations.hs2
1 files changed, 1 insertions, 1 deletions
diff --git a/Operations.hs b/Operations.hs
index ed25b31..886d8ac 100644
--- a/Operations.hs
+++ b/Operations.hs
@@ -161,7 +161,7 @@ manage w = do
withDisplay $ \d -> io $ do
selectInput d w $ structureNotifyMask .|. enterWindowMask .|. propertyChangeMask
mapWindow d w
- setWindowBorderWidth d w 1
+ setWindowBorderWidth d w borderWidth
windows $ W.push w
-- | unmanage. A window no longer exists, remove it from the window