[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
[elpa] externals/pyim 88ad4d9d06: Revert "Fix popon tooltip show wrong p
From: |
ELPA Syncer |
Subject: |
[elpa] externals/pyim 88ad4d9d06: Revert "Fix popon tooltip show wrong position." |
Date: |
Fri, 27 Jan 2023 20:58:02 -0500 (EST) |
branch: externals/pyim
commit 88ad4d9d06eded71a80db4485d0ddfcb20b40a4c
Author: Feng Shu <tumashu@163.com>
Commit: Feng Shu <tumashu@163.com>
Revert "Fix popon tooltip show wrong position."
This reverts commit bb9dd23abb09f9d39cc30c102c7533da82bc5d51.
---
pyim-page.el | 13 ++++++++-----
1 file changed, 8 insertions(+), 5 deletions(-)
diff --git a/pyim-page.el b/pyim-page.el
index b62ee59b75..fa78950aa7 100644
--- a/pyim-page.el
+++ b/pyim-page.el
@@ -359,11 +359,14 @@ pyim-page 的核心的功能,为此增加代码的复杂度和测试的难度
(when pyim-page--popon
;; 延迟获取词条的时候,如果不把已经存在的 popon 删除,就会出现两个 page.
(popon-kill pyim-page--popon))
- (setq pyim-page--popon
- (popon-create
- (pyim-page--add-default-page-face
- (pyim-page--align-lines string))
- (popon-x-y-at-pos position))))
+ (let* ((x-y (popon-x-y-at-pos position))
+ (x (car x-y))
+ (y (cdr x-y)))
+ (setq pyim-page--popon
+ (popon-create
+ (pyim-page--add-default-page-face
+ (pyim-page--align-lines string))
+ (cons x (+ y 1))))))
(defun pyim-page--add-default-page-face (string)
"为 STRING 添加默认 page face."
[Prev in Thread] |
Current Thread |
[Next in Thread] |
- [elpa] externals/pyim 88ad4d9d06: Revert "Fix popon tooltip show wrong position.",
ELPA Syncer <=