[elpa] externals/pyim 9e572bb 1/4: * pyim-indicator.el (pyim-indicator-with-posframe): Use posframe-workable-p

[ELPA Syncer]

branch: externals/pyim
commit 9e572bba16cf10398d98d732c2200df745003fb6
Author: Feng Shu <tumashu@163.com>
Commit: Feng Shu <tumashu@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)