diff --git a/bin/xmonad.hs b/bin/xmonad.hs
index 11bdfa7..7b4dd74 100644
--- a/bin/xmonad.hs
+++ b/bin/xmonad.hs
@@ -143,6 +143,8 @@ evalConf db@DBusState { dbSysClient = cl } = do
   tt <- evalAlways $ fsTabbedTheme fs
   io $ putStrLn "tabbed theme started"
   io $ hFlush stdout
+  -- uninstallSignalHandlers
+  -- io $ print =<< readCreateProcessWithExitCode (proc "echo" ["hi"]) ""
   startDBusInterfaces fs
   io $ putStrLn "dbus started"
   io $ hFlush stdout