Mercurial > hg > xemacs-beta
diff lisp/packages/mode-motion+.el @ 82:6a378aca36af r20-0b91
Import from CVS: tag r20-0b91
author | cvs |
---|---|
date | Mon, 13 Aug 2007 09:07:36 +0200 |
parents | 131b0175ea99 |
children | 360340f9fd5f |
line wrap: on
line diff
--- a/lisp/packages/mode-motion+.el Mon Aug 13 09:06:45 2007 +0200 +++ b/lisp/packages/mode-motion+.el Mon Aug 13 09:07:36 2007 +0200 @@ -1134,8 +1134,9 @@ (progn ;; (message "%s" (event-window event)) (move-to-window-line - (if (< emacs-minor-version 12) - (- (event-y event) + (if (and (= emacs-major-version 19) + (< emacs-minor-version 12)) + (- (event-y event) (nth 1 (window-edges window))) (event-y event))) (beginning-of-line)