diff --git a/lib/Phi/X11.hs b/lib/Phi/X11.hs
index 8d037a8..3beb47e 100644
--- a/lib/Phi/X11.hs
+++ b/lib/Phi/X11.hs
@@ -70,6 +70,8 @@ defaultXConfig = XConfig { phiXScreenInfo = getScreenInfo
 
 runPhi :: XConfig -> Panel.PanelConfig -> [Widget.Widget] -> IO ()
 runPhi xconfig config widgets = do
+  xSetErrorHandler
+  
   phi <- initPhi
   disp <- openDisplay []