[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
[elpa] externals/pyim 5a8be7f327 37/58: Sort pyim-indicator.el
From: |
ELPA Syncer |
Subject: |
[elpa] externals/pyim 5a8be7f327 37/58: Sort pyim-indicator.el |
Date: |
Fri, 24 Jun 2022 06:57:54 -0400 (EDT) |
branch: externals/pyim
commit 5a8be7f32729c474938bd92c63f91aba21041e2d
Author: Feng Shu <tumashu@163.com>
Commit: Feng Shu <tumashu@163.com>
Sort pyim-indicator.el
---
pyim-indicator.el | 40 ++++++++++++++++++++--------------------
1 file changed, 20 insertions(+), 20 deletions(-)
diff --git a/pyim-indicator.el b/pyim-indicator.el
index 5854872c03..88b41082e8 100644
--- a/pyim-indicator.el
+++ b/pyim-indicator.el
@@ -93,6 +93,18 @@ timer 实现。"
(add-hook 'pyim-process-start-daemon-hook #'pyim-indicator-start-daemon)
+(defun pyim-indicator--daemon-function ()
+ "`pyim-indicator-daemon' 内部使用的函数。"
+ (while-no-input
+ (redisplay)
+ (ignore-errors
+ (let ((chinese-input-p
+ (and (functionp pyim-indicator--daemon-function-argument)
+ (funcall pyim-indicator--daemon-function-argument))))
+ (dolist (indicator pyim-indicator-list)
+ (when (functionp indicator)
+ (funcall indicator current-input-method chinese-input-p)))))))
+
(defun pyim-indicator-stop-daemon ()
"Stop indicator daemon."
(interactive)
@@ -111,31 +123,11 @@ timer 实现。"
(add-hook 'pyim-process-stop-daemon-hook #'pyim-indicator-stop-daemon)
-(defun pyim-indicator--daemon-function ()
- "`pyim-indicator-daemon' 内部使用的函数。"
- (while-no-input
- (redisplay)
- (ignore-errors
- (let ((chinese-input-p
- (and (functionp pyim-indicator--daemon-function-argument)
- (funcall pyim-indicator--daemon-function-argument))))
- (dolist (indicator pyim-indicator-list)
- (when (functionp indicator)
- (funcall indicator current-input-method chinese-input-p)))))))
-
(defun pyim-indicator--revert-cursor-color ()
"将 cursor 颜色重置到 pyim 启动之前的状态。"
(when pyim-indicator--original-cursor-color
(set-cursor-color pyim-indicator--original-cursor-color)))
-(defun pyim-indicator--update-mode-line ()
- "更新 mode-line."
- (unless (eq pyim-indicator--last-input-method-title
- current-input-method-title)
- (force-mode-line-update)
- (setq pyim-indicator--last-input-method-title
- current-input-method-title)))
-
(defun pyim-indicator-with-cursor-color (input-method chinese-input-p)
"Pyim 自带的 indicator, 通过光标颜色来显示输入状态。"
(if (not (equal input-method "pyim"))
@@ -173,6 +165,14 @@ timer 实现。"
(setq current-input-method-title (nth 1
pyim-indicator-modeline-string))))
(pyim-indicator--update-mode-line))
+(defun pyim-indicator--update-mode-line ()
+ "更新 mode-line."
+ (unless (eq pyim-indicator--last-input-method-title
+ current-input-method-title)
+ (force-mode-line-update)
+ (setq pyim-indicator--last-input-method-title
+ current-input-method-title)))
+
;; * Footer
(provide 'pyim-indicator)
- [elpa] externals/pyim 1b5c7a8ac7 07/58: pyim-cregexp-create-cregexp-from-string -> pyim-cregexp--create-cregexp-from-string, (continued)
- [elpa] externals/pyim 1b5c7a8ac7 07/58: pyim-cregexp-create-cregexp-from-string -> pyim-cregexp--create-cregexp-from-string, ELPA Syncer, 2022/06/24
- [elpa] externals/pyim 314279993d 14/58: pyim-cstring-split-to-string-1 -> pyim-cstring--split-to-string, ELPA Syncer, 2022/06/24
- [elpa] externals/pyim 20d9feea63 13/58: pyim-cstring-substrings* -> pyim-cstring--substrings*, ELPA Syncer, 2022/06/24
- [elpa] externals/pyim 11a62675d6 17/58: pyim-candidates-sort -> pyim-candidates--sort, ELPA Syncer, 2022/06/24
- [elpa] externals/pyim ba693e4561 18/58: pyim-candidates-quanpin* -> pyim-candidates--quanpin*, ELPA Syncer, 2022/06/24
- [elpa] externals/pyim b8c05f0b7f 25/58: pyim-dcache-value-length -> pyim-dcache--value-length, ELPA Syncer, 2022/06/24
- [elpa] externals/pyim fdd41426a8 29/58: pyim-entered-buffer -> pyim-entered--buffer, ELPA Syncer, 2022/06/24
- [elpa] externals/pyim 148137b2ae 32/58: pyim-indicator-last-input-method-title -> pyim-indicator--last-input-method-title, ELPA Syncer, 2022/06/24
- [elpa] externals/pyim e667d71c3e 33/58: pyim-indicator-daemon-function -> pyim-indicator--daemon-function, ELPA Syncer, 2022/06/24
- [elpa] externals/pyim 9cef8ad02e 36/58: pyim-indicator-select-color -> pyim-indicator--select-color, ELPA Syncer, 2022/06/24
- [elpa] externals/pyim 5a8be7f327 37/58: Sort pyim-indicator.el,
ELPA Syncer <=
- [elpa] externals/pyim 4f4f3c8098 38/58: pyim-liberime-scheme -> pyim-liberime--scheme, ELPA Syncer, 2022/06/24
- [elpa] externals/pyim e64c0be9e2 20/58: pyim-candidates-jianpin-words -> pyim-candidates--jianpin-words, ELPA Syncer, 2022/06/24
- [elpa] externals/pyim 9e006e703d 21/58: pyim-candidates-search-buffer -> pyim-candidates--search-buffer, ELPA Syncer, 2022/06/24
- [elpa] externals/pyim 4bb3a611cc 24/58: pyim-local-variable-list -> pyim--local-variable-list, ELPA Syncer, 2022/06/24
- [elpa] externals/pyim 76f67a8d9c 27/58: pyim-kill-emacs-hook-function -> pyim--kill-emacs-hook-function, ELPA Syncer, 2022/06/24
- [elpa] externals/pyim 25a704da4b 28/58: pyim-input-method-1 -> pyim--input-method, ELPA Syncer, 2022/06/24
- [elpa] externals/pyim 37812896c5 34/58: pyim-indicator-revert-cursor-color -> pyim-indicator--revert-cursor-color, ELPA Syncer, 2022/06/24
- [elpa] externals/pyim 80c81b88cf 48/58: pyim-pinyin-valid-charpy-p -> pyim-pinyin--valid-charpy-p, ELPA Syncer, 2022/06/24
- [elpa] externals/pyim 70a2d9a754 51/58: Add pyim-pinyin-valid-shuangpin-p, ELPA Syncer, 2022/06/24
- [elpa] externals/pyim 894e4cd5e1 43/58: Remove pyim-pinyin-build-regexp, ELPA Syncer, 2022/06/24