[elpa] externals/pyim 43b09cfcac 26/35: pyim-process-input-chinese-predicate-1 -> pyim-process--input-chinese-predicate-1

[ELPA Syncer]

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

    pyim-process-input-chinese-predicate-1 -> 
pyim-process--input-chinese-predicate-1
---
 pyim-process.el     |  6 +++---
 tests/pyim-tests.el | 24 ++++++++++++------------
 2 files changed, 15 insertions(+), 15 deletions(-)

diff --git a/pyim-process.el b/pyim-process.el
index 3ca449aec2..e79e59cbc5 100644
--- a/pyim-process.el
+++ b/pyim-process.el
@@ -298,11 +298,11 @@ imobj 组合构成在一起，构成了 imobjs 这个概念。比如：
          (first-chars (pyim-scheme-first-chars scheme))
          (rest-chars (pyim-scheme-rest-chars scheme))
          (entered (pyim-entered-get 'point-before)))
-    (and (pyim-process-input-chinese-predicate-1)
+    (and (pyim-process--input-chinese-predicate-1)
          (pyim-process-input-chinese-predicate-2
           last-command-event entered first-chars rest-chars))))
 
-(defun pyim-process-input-chinese-predicate-1 ()
+(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)
@@ -316,7 +316,7 @@ imobj 组合构成在一起，构成了 imobjs 这个概念。比如：
 
 (defun pyim-process-indicator-function ()
   "Indicator function."
-  (pyim-process-input-chinese-predicate-1))
+  (pyim-process--input-chinese-predicate-1))
 
 (defun pyim-process-run ()
   "查询 entered 字符串, 显示备选词等待用户选择。"
diff --git a/tests/pyim-tests.el b/tests/pyim-tests.el
index 9df2a6c92a..5329b6e890 100644
--- a/tests/pyim-tests.el
+++ b/tests/pyim-tests.el
@@ -1938,55 +1938,55 @@ abc 这是")))
                (lambda () nil))))
     (should (pyim-process-force-input-chinese-p))))
 
-(ert-deftest pyim-tests-pyim-process-input-chinese-predicate-1 ()
+(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)
             ((symbol-function 'pyim-process-auto-switch-english-input-p)
              (lambda () t)))
-    (should (pyim-process-input-chinese-predicate-1)))
+    (should (pyim-process--input-chinese-predicate-1)))
 
   (cl-letf (((symbol-function 'pyim-process-force-input-chinese-p)
              (lambda () t))
             (pyim-process-input-ascii nil)
             ((symbol-function 'pyim-process-auto-switch-english-input-p)
              (lambda () t)))
-    (should (pyim-process-input-chinese-predicate-1)))
+    (should (pyim-process--input-chinese-predicate-1)))
 
   (cl-letf (((symbol-function 'pyim-process-force-input-chinese-p)
              (lambda () t))
             (pyim-process-input-ascii nil)
             ((symbol-function 'pyim-process-auto-switch-english-input-p)
              (lambda () t)))
-    (should (pyim-process-input-chinese-predicate-1)))
+    (should (pyim-process--input-chinese-predicate-1)))
 
   (cl-letf (((symbol-function 'pyim-process-force-input-chinese-p)
              (lambda () nil))
             (pyim-process-input-ascii nil)
             ((symbol-function 'pyim-process-auto-switch-english-input-p)
              (lambda () nil)))
-    (should (pyim-process-input-chinese-predicate-1)))
+    (should (pyim-process--input-chinese-predicate-1)))
 
   (cl-letf (((symbol-function 'pyim-process-force-input-chinese-p)
              (lambda () nil))
             (pyim-process-input-ascii t)
             ((symbol-function 'pyim-process-auto-switch-english-input-p)
              (lambda () nil)))
-    (should-not (pyim-process-input-chinese-predicate-1)))
+    (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)
             ((symbol-function 'pyim-process-auto-switch-english-input-p)
              (lambda () t)))
-    (should-not (pyim-process-input-chinese-predicate-1)))
+    (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)
             ((symbol-function 'pyim-process-auto-switch-english-input-p)
              (lambda () nil)))
-    (should (pyim-process-input-chinese-predicate-1))))
+    (should (pyim-process--input-chinese-predicate-1))))
 
 (ert-deftest pyim-tests-pyim-process-input-chinese-predicate-2 ()
   (should (pyim-process-input-chinese-predicate-2 ?a "" "abc" "def"))
@@ -1995,25 +1995,25 @@ abc 这是")))
   (should-not (pyim-process-input-chinese-predicate-2 ?g "a" "abc" "def")))
 
 (ert-deftest pyim-tests-pyim-process-input-chinese-p ()
-  (cl-letf (((symbol-function 'pyim-process-input-chinese-predicate-1)
+  (cl-letf (((symbol-function 'pyim-process--input-chinese-predicate-1)
              (lambda (&rest _) nil))
             ((symbol-function 'pyim-process-input-chinese-predicate-2)
              (lambda (&rest _) nil)))
     (should-not (pyim-process-input-chinese-p)))
 
-  (cl-letf (((symbol-function 'pyim-process-input-chinese-predicate-1)
+  (cl-letf (((symbol-function 'pyim-process--input-chinese-predicate-1)
              (lambda (&rest _) t))
             ((symbol-function 'pyim-process-input-chinese-predicate-2)
              (lambda (&rest _) nil)))
     (should-not (pyim-process-input-chinese-p)))
 
-  (cl-letf (((symbol-function 'pyim-process-input-chinese-predicate-1)
+  (cl-letf (((symbol-function 'pyim-process--input-chinese-predicate-1)
              (lambda (&rest _) nil))
             ((symbol-function 'pyim-process-input-chinese-predicate-2)
              (lambda (&rest _) t)))
     (should-not (pyim-process-input-chinese-p)))
 
-  (cl-letf (((symbol-function 'pyim-process-input-chinese-predicate-1)
+  (cl-letf (((symbol-function 'pyim-process--input-chinese-predicate-1)
              (lambda (&rest _) t))
             ((symbol-function 'pyim-process-input-chinese-predicate-2)
              (lambda (&rest _) t)))