emacs-elpa-diffs
[Top][All Lists]
Advanced

[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]

[elpa] externals/pyim b744349efb 02/22: pyim-process-input-ascii -> pyim


From: ELPA Syncer
Subject: [elpa] externals/pyim b744349efb 02/22: pyim-process-input-ascii -> pyim-process--input-ascii
Date: Fri, 24 Jun 2022 16:57:51 -0400 (EDT)

branch: externals/pyim
commit b744349efbcafbfb6ba3c1d74c9913c3f1ac0d91
Author: Feng Shu <tumashu@163.com>
Commit: Feng Shu <tumashu@163.com>

    pyim-process-input-ascii -> pyim-process--input-ascii
---
 pyim-process.el     | 12 ++++++------
 tests/pyim-tests.el | 14 +++++++-------
 2 files changed, 13 insertions(+), 13 deletions(-)

diff --git a/pyim-process.el b/pyim-process.el
index a4107ae8e7..e4220abae3 100644
--- a/pyim-process.el
+++ b/pyim-process.el
@@ -88,7 +88,7 @@ entered (nihaom) 的第一个候选词。
   "延迟多少秒开始延迟获取词条。"
   :type 'integer)
 
-(defvar pyim-process-input-ascii nil
+(defvar pyim-process--input-ascii nil
   "是否开启 pyim 英文输入模式.")
 
 (defvar pyim-process-force-input-chinese nil
@@ -191,7 +191,7 @@ imobj 组合构成在一起,构成了 imobjs 这个概念。比如:
 细节信息请参考 `pyim-page--refresh' 的 docstring.")
 
 (pyim-register-local-variables
- '(pyim-process-input-ascii
+ '(pyim-process--input-ascii
    pyim-process-translating
    pyim-process--imobjs
    pyim-process--candidates
@@ -305,13 +305,13 @@ imobj 组合构成在一起,构成了 imobjs 这个概念。比如:
 (defun pyim-process-toggle-input-ascii ()
   "pyim 切换中英文输入模式, 同时调整标点符号样式。"
   (interactive)
-  (setq pyim-process-input-ascii
-        (not pyim-process-input-ascii)))
+  (setq pyim-process--input-ascii
+        (not pyim-process--input-ascii)))
 
 (defun pyim-process--input-chinese-predicate-1 ()
   "`pyim-process-input-chinese-p' 内部函数,测试环境。"
   (or (pyim-process-force-input-chinese-p)
-      (and (not pyim-process-input-ascii)
+      (and (not pyim-process--input-ascii)
            (not (pyim-process-auto-switch-english-input-p)))))
 
 (defun pyim-process--input-chinese-predicate-2 (event entered first-chars 
rest-chars)
@@ -695,7 +695,7 @@ alist 列表。"
     (auto
      ;; 如果用户手动或者根据环境自动切换为英文输入模式,
      ;; 那么标点符号也要切换为半角模式。
-     (and (not pyim-process-input-ascii)
+     (and (not pyim-process--input-ascii)
           (not (pyim-process-auto-switch-english-input-p))))))
 
 (defun pyim-process-create-code-criteria ()
diff --git a/tests/pyim-tests.el b/tests/pyim-tests.el
index cbdd6c54b7..e0f8f01649 100644
--- a/tests/pyim-tests.el
+++ b/tests/pyim-tests.el
@@ -1941,49 +1941,49 @@ abc 这是")))
 (ert-deftest pyim-tests-pyim-process--input-chinese-predicate-1 ()
   (cl-letf (((symbol-function 'pyim-process-force-input-chinese-p)
              (lambda () t))
-            (pyim-process-input-ascii t)
+            (pyim-process--input-ascii t)
             ((symbol-function 'pyim-process-auto-switch-english-input-p)
              (lambda () t)))
     (should (pyim-process--input-chinese-predicate-1)))
 
   (cl-letf (((symbol-function 'pyim-process-force-input-chinese-p)
              (lambda () t))
-            (pyim-process-input-ascii nil)
+            (pyim-process--input-ascii nil)
             ((symbol-function 'pyim-process-auto-switch-english-input-p)
              (lambda () t)))
     (should (pyim-process--input-chinese-predicate-1)))
 
   (cl-letf (((symbol-function 'pyim-process-force-input-chinese-p)
              (lambda () t))
-            (pyim-process-input-ascii nil)
+            (pyim-process--input-ascii nil)
             ((symbol-function 'pyim-process-auto-switch-english-input-p)
              (lambda () t)))
     (should (pyim-process--input-chinese-predicate-1)))
 
   (cl-letf (((symbol-function 'pyim-process-force-input-chinese-p)
              (lambda () nil))
-            (pyim-process-input-ascii nil)
+            (pyim-process--input-ascii nil)
             ((symbol-function 'pyim-process-auto-switch-english-input-p)
              (lambda () nil)))
     (should (pyim-process--input-chinese-predicate-1)))
 
   (cl-letf (((symbol-function 'pyim-process-force-input-chinese-p)
              (lambda () nil))
-            (pyim-process-input-ascii t)
+            (pyim-process--input-ascii t)
             ((symbol-function 'pyim-process-auto-switch-english-input-p)
              (lambda () nil)))
     (should-not (pyim-process--input-chinese-predicate-1)))
 
   (cl-letf (((symbol-function 'pyim-process-force-input-chinese-p)
              (lambda () nil))
-            (pyim-process-input-ascii nil)
+            (pyim-process--input-ascii nil)
             ((symbol-function 'pyim-process-auto-switch-english-input-p)
              (lambda () t)))
     (should-not (pyim-process--input-chinese-predicate-1)))
 
   (cl-letf (((symbol-function 'pyim-process-force-input-chinese-p)
              (lambda () nil))
-            (pyim-process-input-ascii nil)
+            (pyim-process--input-ascii nil)
             ((symbol-function 'pyim-process-auto-switch-english-input-p)
              (lambda () nil)))
     (should (pyim-process--input-chinese-predicate-1))))



reply via email to

[Prev in Thread] Current Thread [Next in Thread]