[mcclim-cvs] CVS mcclim/Backends/gtkairo
dlichteblau
dlichteblau at common-lisp.net
Sun Nov 12 11:45:21 UTC 2006
Update of /project/mcclim/cvsroot/mcclim/Backends/gtkairo
In directory clnet:/tmp/cvs-serv5980
Modified Files:
port.lisp
Log Message:
* port.lisp (*double-buffering-p*): By default, enable double
buffering only on Windows.
--- /project/mcclim/cvsroot/mcclim/Backends/gtkairo/port.lisp 2006/11/12 11:26:13 1.8
+++ /project/mcclim/cvsroot/mcclim/Backends/gtkairo/port.lisp 2006/11/12 11:45:21 1.9
@@ -133,7 +133,9 @@
(defmethod mirror-real-drawable ((mirror widget-mirror))
(gtkwidget-gdkwindow (mirror-widget mirror)))
-(defvar *double-buffering-p* t)
+(defvar *double-buffering-p*
+ #+(or win32 windows mswindows) t
+ #-(or win32 windows mswindows) nil)
(defmethod mirror-drawable ((mirror widget-mirror))
(if *double-buffering-p*
More information about the Mcclim-cvs
mailing list