1 files changed, 5 insertions, 0 deletions
diff --git a/Main.hs b/Main.hs
index 7f9da13..c86ebe7 100644
--- a/Main.hs
+++ b/Main.hs
@@ -41,6 +41,11 @@ main = do
   c        <- case file of
                 [cfgfile] -> readConfig cfgfile
                 _         -> readDefaultConfig
+
+  -- listen for ConfigureEvents on the root window, for xrandr support:
+  rootw <- rootWindow d (defaultScreen d)
+  selectInput d rootw structureNotifyMask
+
   civ      <- newIORef c
   doOpts civ o
   conf     <- readIORef civ