
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
participants (1)
-
ahefner