Handle X errors
This commit is contained in:
parent
5359238f79
commit
4419a111fd
1 changed files with 2 additions and 0 deletions
|
@ -70,6 +70,8 @@ defaultXConfig = XConfig { phiXScreenInfo = getScreenInfo
|
||||||
|
|
||||||
runPhi :: XConfig -> Panel.PanelConfig -> [Widget.Widget] -> IO ()
|
runPhi :: XConfig -> Panel.PanelConfig -> [Widget.Widget] -> IO ()
|
||||||
runPhi xconfig config widgets = do
|
runPhi xconfig config widgets = do
|
||||||
|
xSetErrorHandler
|
||||||
|
|
||||||
phi <- initPhi
|
phi <- initPhi
|
||||||
disp <- openDisplay []
|
disp <- openDisplay []
|
||||||
|
|
||||||
|
|
Reference in a new issue