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

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

[elpa] externals/pyim 68e406ed4f 19/58: pyim-candidates-znabc-words -> p


From: ELPA Syncer
Subject: [elpa] externals/pyim 68e406ed4f 19/58: pyim-candidates-znabc-words -> pyim-candidates--znabc-words
Date: Fri, 24 Jun 2022 06:57:53 -0400 (EDT)

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

    pyim-candidates-znabc-words -> pyim-candidates--znabc-words
---
 pyim-candidates.el  | 4 ++--
 tests/pyim-tests.el | 6 +++---
 2 files changed, 5 insertions(+), 5 deletions(-)

diff --git a/pyim-candidates.el b/pyim-candidates.el
index f3d9391195..8053efa3d1 100644
--- a/pyim-candidates.el
+++ b/pyim-candidates.el
@@ -151,7 +151,7 @@
 
 (defun pyim-candidates--quanpin (imobjs scheme &optional fast-search)
   "用于全拼输入法的 `pyim-candidates-create' 方法内部使用的函数。"
-  (let* ((znabc-words (pyim-candidates-znabc-words imobjs scheme fast-search))
+  (let* ((znabc-words (pyim-candidates--znabc-words imobjs scheme fast-search))
          (jianpin-words (pyim-candidates-jianpin-words imobjs scheme 
fast-search))
          (quanpin-words (pyim-candidates--quanpin-words imobjs scheme 
fast-search))
          (personal-words (pyim-candidates--sort (nth 0 quanpin-words)))
@@ -170,7 +170,7 @@
     (when pyim-debug (print words))
     (delete-dups (cl-remove-if-not #'stringp words))))
 
-(defun pyim-candidates-znabc-words (imobjs scheme &optional fast-search)
+(defun pyim-candidates--znabc-words (imobjs scheme &optional fast-search)
   "智能ABC模式,得到尽可能的拼音组合,查询这些组合,得到的词条做为联想词。"
   (let ((codes (mapcar (lambda (x)
                          (pyim-subconcat x "-"))
diff --git a/tests/pyim-tests.el b/tests/pyim-tests.el
index 1d184ba7da..d1a08e707f 100644
--- a/tests/pyim-tests.el
+++ b/tests/pyim-tests.el
@@ -558,7 +558,7 @@
               wubi)
              '("㠭子叕" "㠭子又")))))
 
-(ert-deftest pyim-tests-pyim-candidates-znabc-words ()
+(ert-deftest pyim-tests-pyim-candidates--znabc-words ()
   (let* ((pyim-dhashcache-code2word (make-hash-table :test #'equal))
          (pyim-dhashcache-icode2word (make-hash-table :test #'equal))
          (quanpin (pyim-scheme-get 'quanpin))
@@ -566,9 +566,9 @@
     (puthash "ni-hao" (list "你好" "尼耗") pyim-dhashcache-code2word)
     (puthash "ni-hao-ma" (list "你好吗" "你好马") pyim-dhashcache-code2word)
     (puthash "ni-hao-ma-peng-you" (list "你好吗朋友" "你好吗喷油") 
pyim-dhashcache-code2word)
-    (should (equal (pyim-candidates-znabc-words imobjs quanpin)
+    (should (equal (pyim-candidates--znabc-words imobjs quanpin)
                    '("你好吗朋友" "你好吗" "你好" "你好吗喷油" "你好马" "尼耗")))
-    (should (equal (pyim-candidates-znabc-words imobjs quanpin t)
+    (should (equal (pyim-candidates--znabc-words imobjs quanpin t)
                    '("你好吗朋友" "你好吗" "你好")))))
 
 (ert-deftest pyim-tests-pyim-candidates-jianpin-words ()



reply via email to

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