Mercurial > emacs
changeset 15331:8cf5ec9e5058
(xterm-mouse-event): Adjust for minibuffer prompt width.
| author | Richard M. Stallman <rms@gnu.org> |
|---|---|
| date | Tue, 04 Jun 1996 21:51:59 +0000 |
| parents | 770c11688d0f |
| children | 008f373921e4 |
| files | lisp/xt-mouse.el |
| diffstat | 1 files changed, 4 insertions(+), 0 deletions(-) [+] |
line wrap: on
line diff
--- a/lisp/xt-mouse.el Tue Jun 04 16:37:27 1996 +0000 +++ b/lisp/xt-mouse.el Tue Jun 04 21:51:59 1996 +0000 @@ -124,6 +124,10 @@ (goto-char (window-start window)) (move-to-window-line (cdr where)) (move-to-column (+ (car where) (current-column) + (if (string-match "\\` \\*Minibuf" + (buffer-name)) + (- (minibuffer-prompt-width)) + 0) (max 0 (1- (window-hscroll))))) (point)) where))