Get point position right

This commit is contained in:
Yuan Fu 2020-03-16 12:19:29 -04:00
parent 9137860707
commit 82dc2e96e6
No known key found for this signature in database
GPG Key ID: 56E19BC57664A442

View File

@ -250,7 +250,7 @@ WINDOW nil means use selected window."
(let* ((pos (pos-visible-in-window-p point window t)) (let* ((pos (pos-visible-in-window-p point window t))
(x (car pos)) (x (car pos))
(y (cadr pos)) (y (cadr pos))
(edges (window-body-pixel-edges window))) (edges (window-edges window nil nil t)))
(cons (+ x (car edges)) (cons (+ x (car edges))
(+ y (cadr edges))))) (+ y (cadr edges)))))