[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
[elpa] externals/pyim cfc1fab 1/3: Add pyim-page-subword face.
From: |
ELPA Syncer |
Subject: |
[elpa] externals/pyim cfc1fab 1/3: Add pyim-page-subword face. |
Date: |
Sat, 18 Dec 2021 01:57:36 -0500 (EST) |
branch: externals/pyim
commit cfc1fabc694eb3eec828a667d90b637890c9fba4
Author: Feng Shu <tumashu@163.com>
Commit: Feng Shu <tumashu@163.com>
Add pyim-page-subword face.
* pyim-page.el (pyim-page-subword): New face.
(pyim-page-menu-create): Use pyim-page-subword face.
---
pyim-page.el | 6 +++++-
1 file changed, 5 insertions(+), 1 deletion(-)
diff --git a/pyim-page.el b/pyim-page.el
index 389fe81..08dabca 100644
--- a/pyim-page.el
+++ b/pyim-page.el
@@ -97,6 +97,10 @@ Only useful when use posframe.")
注意:当使用 minibuffer 为选词框时,这个选项才有用处。")
+(defface pyim-page-subword
+ '((t (:background "gray44")))
+ "使用以词选字功能时,选择的汉字所使用的 face.")
+
(defvar pyim-page-tooltip-posframe-buffer "
*pyim-page-tooltip-posframe-buffer*"
"这个变量用来保存做为 page tooltip 的 posframe 的 buffer.")
@@ -368,7 +372,7 @@ page 的概念,比如,上面的 “nihao” 的 *待选词列表* 就可以
candidate))))
(dolist (n pyim-outcome-subword-info)
(when (<= n (length str))
- (set-text-properties (- n 1) n '(face highlight) str)))
+ (set-text-properties (- n 1) n '(face pyim-page-subword) str)))
(setq i (1+ i))
;; 高亮当前选择的词条,用于 `pyim-page-next-word'
(push