Update of /project/mcclim/cvsroot/mcclim/Backends/CLX In directory cl-net:/tmp/cvs-serv28749
Modified Files: port.lisp Log Message: Fix off by one error in CLX button decoding, based on patch by Mike Watters.
--- /project/mcclim/cvsroot/mcclim/Backends/CLX/port.lisp 2008/05/13 03:04:39 1.134 +++ /project/mcclim/cvsroot/mcclim/Backends/CLX/port.lisp 2008/10/20 17:31:41 1.135 @@ -617,7 +617,7 @@ +pointer-wheel-left+ +pointer-wheel-right+))) (and (> code 0) - (<= code (1+ (length button-mapping))) + (<= code (length button-mapping)) (aref button-mapping (1- code)))))
;; From "Inter-Client Communication Conventions Manual", Version 2.0.xf86.1,