diff options
| -rw-r--r-- | Operations.hs | 1 |
1 files changed, 1 insertions, 0 deletions
diff --git a/Operations.hs b/Operations.hs index 17280a2..4346398 100644 --- a/Operations.hs +++ b/Operations.hs @@ -159,6 +159,7 @@ manage w = do withDisplay $ \d -> io $ do selectInput d w $ structureNotifyMask .|. enterWindowMask .|. propertyChangeMask mapWindow d w + setWindowBorderWidth d w 1 windows $ W.push w -- | unmanage. A window no longer exists, remove it from the window |