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

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

[elpa] externals/pyim c58b3e572b 30/35: pyim-process-autoselector-find-r


From: ELPA Syncer
Subject: [elpa] externals/pyim c58b3e572b 30/35: pyim-process-autoselector-find-result -> pyim-process--autoselector-find-result
Date: Fri, 24 Jun 2022 08:58:08 -0400 (EDT)

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

    pyim-process-autoselector-find-result -> 
pyim-process--autoselector-find-result
---
 pyim-process.el     | 6 +++---
 tests/pyim-tests.el | 4 ++--
 2 files changed, 5 insertions(+), 5 deletions(-)

diff --git a/pyim-process.el b/pyim-process.el
index 04fabd5717..03d4d88a24 100644
--- a/pyim-process.el
+++ b/pyim-process.el
@@ -360,9 +360,9 @@ imobj 组合构成在一起,构成了 imobjs 这个概念。比如:
           (when (pyim-process-self-insert-command-p this-command)
             (pyim-process--autoselector-results)))
          (select-last-word
-          (pyim-process-autoselector-find-result results 'last))
+          (pyim-process--autoselector-find-result results 'last))
          (select-current-word
-          (pyim-process-autoselector-find-result results 'current)))
+          (pyim-process--autoselector-find-result results 'current)))
     (when (or select-last-word select-current-word)
       (let* ((str (plist-get (if select-last-word
                                  select-last-word
@@ -404,7 +404,7 @@ imobj 组合构成在一起,构成了 imobjs 这个概念。比如:
   "测试 CMD 是否是一个 pyim self insert command."
   (member cmd pyim-process-self-insert-commands))
 
-(defun pyim-process-autoselector-find-result (results type)
+(defun pyim-process--autoselector-find-result (results type)
   "从所有 autoselector 运行结果中,寻找返回类型为 TYPE 的结果。"
   (cl-find-if (lambda (x)
                 (equal (plist-get x :select) type))
diff --git a/tests/pyim-tests.el b/tests/pyim-tests.el
index 35463fe562..c1e92b8c69 100644
--- a/tests/pyim-tests.el
+++ b/tests/pyim-tests.el
@@ -2043,9 +2043,9 @@ abc 这是")))
                      (:select current :replace "test2")
                      (:select last :replace "test3")
                      (:select last :replace "test4"))))
-    (should (equal (pyim-process-autoselector-find-result results 'current)
+    (should (equal (pyim-process--autoselector-find-result results 'current)
                    '(:select current :replace "test1")))
-    (should (equal (pyim-process-autoselector-find-result results 'last)
+    (should (equal (pyim-process--autoselector-find-result results 'last)
                    '(:select last :replace "test3")))))
 
 (ert-deftest pyim-tests-pyim-process-self-insert-command-p ()



reply via email to

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