Mercurial > hg > xemacs-beta
diff lisp/mouse.el @ 446:1ccc32a20af4 r21-2-38
Import from CVS: tag r21-2-38
author | cvs |
---|---|
date | Mon, 13 Aug 2007 11:37:21 +0200 |
parents | 576fb035e263 |
children | 52626a2f02ef |
line wrap: on
line diff
--- a/lisp/mouse.el Mon Aug 13 11:36:20 2007 +0200 +++ b/lisp/mouse.el Mon Aug 13 11:37:21 2007 +0200 @@ -748,7 +748,7 @@ (let* ((edges (window-pixel-edges window)) (row (event-y-pixel event)) (text-start (nth 1 edges)) - (text-end (+ (nth 3 edges)))) + (text-end (nth 3 edges))) (if (or (< row text-start) (> row text-end)) nil ;; Scroll