branch: externals/pyim commit 9e572bba16cf10398d98d732c2200df745003fb6 Author: Feng Shu <tuma...@163.com> Commit: Feng Shu <tuma...@163.com>
* pyim-indicator.el (pyim-indicator-with-posframe): Use posframe-workable-p --- pyim-indicator.el | 23 ++++++++++++----------- 1 file changed, 12 insertions(+), 11 deletions(-) diff --git a/pyim-indicator.el b/pyim-indicator.el index a158fe4..3391a7b 100644 --- a/pyim-indicator.el +++ b/pyim-indicator.el @@ -129,17 +129,18 @@ Indicator 用于显示输入法当前输入状态(英文还是中文)。" (defun pyim-indicator-with-posframe (current-input-method chinese-input-p) "Pyim 自带的 indicator, 通过 posframe 来显示输入状态。" - (let ((buffer " *pyim-indicator*") - (posframe-mouse-banish nil)) - (if (not (equal current-input-method "pyim")) - (posframe-hide buffer) - (if chinese-input-p - (posframe-show buffer - :string "##" - :font "Monospace-2" - :poshandler #'posframe-poshandler-point-top-left-corner - :background-color "green") - (posframe-hide buffer))))) + (when (posframe-workable-p) + (let ((buffer " *pyim-indicator*") + (posframe-mouse-banish nil)) + (if (not (equal current-input-method "pyim")) + (posframe-hide buffer) + (if chinese-input-p + (posframe-show buffer + :string "##" + :font "Monospace-2" + :poshandler #'posframe-poshandler-point-top-left-corner + :background-color "green") + (posframe-hide buffer)))))) ;; * Footer (provide 'pyim-indicator)