diff options
-rw-r--r-- | GLX.hs | 13 |
1 files changed, 7 insertions, 6 deletions
@@ -49,12 +49,13 @@ instance Driver GLX where disp <- openDisplay "" delwnd <- internAtom disp "WM_DELETE_WINDOW" False fbconfigs <- chooseFBConfig disp (fromIntegral . defaultScreen $ disp) - [(renderType, rgbaBit) - , (drawableType, windowBit) - , (xRenderable, 1) - , (depthSize, 1) - , (stencilSize, 1) - ] + [ (renderType, rgbaBit) + , (drawableType, windowBit) + , (doublebuffer, 1) + , (xRenderable, 1) + , (depthSize, 1) + , (stencilSize, 1) + ] visualinfo <- getVisualFromFBConfig disp (head fbconfigs) rootwindow <- rootWindow disp (fromIntegral $ viScreen visualinfo) cmap <- createColormap disp rootwindow (viVisual visualinfo) allocNone |