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

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

[elpa] externals/pyim 2473b5be9b 24/35: pyim-process-candidate-position


From: ELPA Syncer
Subject: [elpa] externals/pyim 2473b5be9b 24/35: pyim-process-candidate-position -> pyim-process--candidate-position
Date: Fri, 24 Jun 2022 08:58:07 -0400 (EDT)

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

    pyim-process-candidate-position -> pyim-process--candidate-position
---
 pyim-process.el     | 14 +++++++-------
 tests/pyim-tests.el |  8 ++++----
 2 files changed, 11 insertions(+), 11 deletions(-)

diff --git a/pyim-process.el b/pyim-process.el
index 9f16ee4407..46efd6f424 100644
--- a/pyim-process.el
+++ b/pyim-process.el
@@ -185,7 +185,7 @@ imobj 组合构成在一起,构成了 imobjs 这个概念。比如:
 (defvar pyim-process--candidates-last nil
   "上一轮备选词条列表,这个变量主要用于 autoselector 机制.")
 
-(defvar pyim-process-candidate-position nil
+(defvar pyim-process--candidate-position nil
   "当前选择的词条在 `pyim-candidates’ 中的位置.
 
 细节信息请参考 `pyim-page--refresh' 的 docstring.")
@@ -195,7 +195,7 @@ imobj 组合构成在一起,构成了 imobjs 这个概念。比如:
    pyim-process-translating
    pyim-process--imobjs
    pyim-process-candidates
-   pyim-process-candidate-position))
+   pyim-process--candidate-position))
 
 (defun pyim-process-ui-init ()
   "初始化 pyim 相关 UI."
@@ -331,7 +331,7 @@ imobj 组合构成在一起,构成了 imobjs 这个概念。比如:
             (or (delete-dups (pyim-candidates-create pyim-process--imobjs 
scheme))
                 (list entered-to-translate)))
       (unless (eq (pyim-process-auto-select) 'auto-select-success)
-        (setq pyim-process-candidate-position 1)
+        (setq pyim-process--candidate-position 1)
         (pyim-process-ui-refresh)
         (pyim-process-run-delay)))))
 
@@ -485,13 +485,13 @@ imobj 组合构成在一起,构成了 imobjs 这个概念。比如:
   (setq pyim-process--candidates-last pyim-process-candidates))
 
 (defun pyim-process-get-candidate-position ()
-  pyim-process-candidate-position)
+  pyim-process--candidate-position)
 
 (defun pyim-process-candidates-length ()
   (length pyim-process-candidates))
 
 (defun pyim-process-set-candidate-position (n)
-  (setq pyim-process-candidate-position n))
+  (setq pyim-process--candidate-position n))
 
 (defun pyim-process-get-first-imobj ()
   (car pyim-process--imobjs))
@@ -538,14 +538,14 @@ imobj 组合构成在一起,构成了 imobjs 这个概念。比如:
           pyim-outcome-history))
         ((eq type 'candidate)
          (let ((candidate
-                (nth (1- pyim-process-candidate-position)
+                (nth (1- pyim-process--candidate-position)
                      pyim-process-candidates)))
            (push
             (concat (pyim-outcome-get) candidate)
             pyim-outcome-history)))
         ((eq type 'candidate-and-last-char)
          (let ((candidate
-                (nth (1- pyim-process-candidate-position)
+                (nth (1- pyim-process--candidate-position)
                      pyim-process-candidates)))
            (push
             (concat (pyim-outcome-get)
diff --git a/tests/pyim-tests.el b/tests/pyim-tests.el
index 4e9c779f24..8113fd5db8 100644
--- a/tests/pyim-tests.el
+++ b/tests/pyim-tests.el
@@ -1784,7 +1784,7 @@ abc 这是")))
 ;; ** pyim-preview 相关单元测试
 (ert-deftest pyim-tests-pyim-preview-string ()
   (let ((pyim-process-candidates '("世界" "时节" "使节" "视界" ))
-        (pyim-process-candidate-position 1)
+        (pyim-process--candidate-position 1)
         (pyim-outcome-history '("你好"))
         (pyim-process--imobjs '((("sh" "i" "sh" "i") ("j" "ie" "j" "ie"))))
         (scheme (pyim-scheme-get 'quanpin)))
@@ -1792,7 +1792,7 @@ abc 这是")))
                    "你好世界")))
 
   (let ((pyim-process-candidates '("世界" "时节" "使节" "视界" ))
-        (pyim-process-candidate-position 2)
+        (pyim-process--candidate-position 2)
         (pyim-outcome-history nil)
         (pyim-process--imobjs '((("sh" "i" "sh" "i") ("j" "ie" "j" "ie"))))
         (scheme (pyim-scheme-get 'quanpin)))
@@ -1800,7 +1800,7 @@ abc 这是")))
                    "时节")))
 
   (let ((pyim-process-candidates '("这是" "蛰是" "这时" "真实" "这使" "这事" "这" "者" "着" 
"折" "哲" "浙" "遮"))
-        (pyim-process-candidate-position 10)
+        (pyim-process--candidate-position 10)
         (pyim-outcome-history nil)
         (pyim-process--imobjs '((("zh" "e" "zh" "e") ("sh" "i" "sh" "i"))))
         (scheme (pyim-scheme-get 'quanpin)))
@@ -1808,7 +1808,7 @@ abc 这是")))
                    "折shi")))
 
   (let ((pyim-process-candidates '("工" "藏匿" "工工" "花花草草" "㠭"))
-        (pyim-process-candidate-position 4)
+        (pyim-process--candidate-position 4)
         (pyim-outcome-history nil)
         (pyim-process--imobjs '(("aaaa")))
         (scheme (pyim-scheme-get 'wubi)))



reply via email to

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