From 6a381a238a10695c5efa79ac7e73818c33c3e1f6 Mon Sep 17 00:00:00 2001 From: Matthias Schiffer Date: Tue, 2 Mar 2010 03:48:03 +0100 Subject: Use double buffers fbconfig --- GLX.hs | 13 +++++++------ 1 file changed, 7 insertions(+), 6 deletions(-) diff --git a/GLX.hs b/GLX.hs index 8a1c52d..3dbb362 100644 --- a/GLX.hs +++ b/GLX.hs @@ -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 -- cgit v1.2.3