[mcclim-cvs] CVS mcclim

[ahefner]

Update of /project/mcclim/cvsroot/mcclim
In directory clnet:/tmp/cvs-serv26500

Modified Files:
	input.lisp 
Log Message:
Fix event compression on single-process lisps. This consists of two
changes: 1) Don't use immediate-sheet-input-mixin, and 2) When reading
events from the backend, read all available events in a nonblocking
fashion, so that events which have accumulated since we last checked
can be compressed.

This requires the backend 'get-next-event' to support :timeout 0. 
Currently CLX and Beagle appear to do so, while Gtkairo does not.



--- /project/mcclim/cvsroot/mcclim/input.lisp	2006/01/16 13:16:38	1.35
+++ /project/mcclim/cvsroot/mcclim/input.lisp	2006/07/08 16:58:36	1.36
@@ -519,7 +519,7 @@
 
 ;;; Class actually used by panes.
 
-(defclass clim-sheet-input-mixin (#+clim-mp standard-sheet-input-mixin #-clim-mp immediate-sheet-input-mixin)
+(defclass clim-sheet-input-mixin (standard-sheet-input-mixin)
   ())
 
 ;;; Mixin for panes which want the mouse wheel to scroll vertically