Update of /project/mcclim/cvsroot/mcclim/Backends/CLX In directory common-lisp.net:/tmp/cvs-serv31917
Modified Files: port.lisp Log Message: EVENT-HANDLER We also deliver :graphics-exposure events as CLIM repaint events.
Date: Mon Nov 28 15:21:45 2005 Author: gbaumann
Index: mcclim/Backends/CLX/port.lisp diff -u mcclim/Backends/CLX/port.lisp:1.113 mcclim/Backends/CLX/port.lisp:1.114 --- mcclim/Backends/CLX/port.lisp:1.113 Mon Nov 28 13:58:18 2005 +++ mcclim/Backends/CLX/port.lisp Mon Nov 28 15:21:45 2005 @@ -766,7 +766,7 @@ :modifier-state modifier-state :timestamp time))))) ;; - ((:exposure :display) + ((:exposure :display :graphics-exposure) ;; Notes: ;; . Do not compare count with 0 here, last rectangle in an ;; :exposure event sequence does not cover the whole region.