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

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

[elpa] externals/pyim 56505723bc 16/58: pyim-autoselector-xingma-1 -> py


From: ELPA Syncer
Subject: [elpa] externals/pyim 56505723bc 16/58: pyim-autoselector-xingma-1 -> pyim-autoselector--xingma
Date: Fri, 24 Jun 2022 06:57:53 -0400 (EDT)

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

    pyim-autoselector-xingma-1 -> pyim-autoselector--xingma
---
 pyim-autoselector.el |  4 ++--
 tests/pyim-tests.el  | 10 +++++-----
 2 files changed, 7 insertions(+), 7 deletions(-)

diff --git a/pyim-autoselector.el b/pyim-autoselector.el
index 3c13d38031..ece3c4d925 100644
--- a/pyim-autoselector.el
+++ b/pyim-autoselector.el
@@ -46,10 +46,10 @@
          (candidates (pyim-process-get-candidates))
          (last-candidates (pyim-process-get-last-candidates)))
     (when (pyim-scheme-xingma-p scheme)
-      (pyim-autoselector-xingma-1
+      (pyim-autoselector--xingma
        split-length entered candidates last-candidates))))
 
-(defun pyim-autoselector-xingma-1 (split-length entered candidates 
last-candidates)
+(defun pyim-autoselector--xingma (split-length entered candidates 
last-candidates)
   "`pyim-autoselector-xingma' 内部使用的函数。"
   (cond
    ((and (= (length entered) split-length)
diff --git a/tests/pyim-tests.el b/tests/pyim-tests.el
index d1ceed2077..500ee9a018 100644
--- a/tests/pyim-tests.el
+++ b/tests/pyim-tests.el
@@ -1827,20 +1827,20 @@ abc 这是")))
                    "花花草草"))))
 
 ;; ** pyim-autoselecter 相关单元测试
-(ert-deftest pyim-tests-pyim-autoselecter-xingma-1 ()
-  (should-not (apply #'pyim-autoselector-xingma-1
+(ert-deftest pyim-tests-pyim-autoselecter--xingma ()
+  (should-not (apply #'pyim-autoselector--xingma
                      '(4 "aaaa" ("工" "藏匿" "花花草草" "工工" "㠭") ("工"))))
 
-  (should (equal (apply #'pyim-autoselector-xingma-1
+  (should (equal (apply #'pyim-autoselector--xingma
                         '(4 "aaaab" ("工" "藏匿" "花花草草" "工工" "㠭") ("工")))
                  '(:select last)))
 
   ;; 自动清除错误输入模式,类似微软五笔:敲第五个字母的时候,前面四个字母自动清除
-  (should (equal (apply #'pyim-autoselector-xingma-1
+  (should (equal (apply #'pyim-autoselector--xingma
                         '(4 "xxxxa" ("工" "戈") ("xxxx")))
                  '(:select last :replace-with "")))
 
-  (should (equal (apply #'pyim-autoselector-xingma-1
+  (should (equal (apply #'pyim-autoselector--xingma
                         '(4 "aaaa" ("工") ("工")))
                  '(:select current))))
 



reply via email to

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