Add at point position hack

This should fix #22
This commit is contained in:
Yuan Fu 2020-03-16 15:56:50 -04:00
parent 82dc2e96e6
commit 7fa3b78d07

View File

@ -249,9 +249,11 @@ The coordinate is relative to the native frame.
WINDOW nil means use selected window." 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))
(en (frame-char-width))
(y (cadr pos)) (y (cadr pos))
(edges (window-edges window nil nil t))) (edges (window-edges window nil nil t)))
(cons (+ x (car edges)) ;; HACK: for unknown reasons we need to add en to x position
(cons (+ x (car edges) en)
(+ y (cadr edges))))) (+ y (cadr edges)))))
(defun eldoc-box--default-at-point-position-function-1 (width height) (defun eldoc-box--default-at-point-position-function-1 (width height)