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

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

[elpa] externals/pyim b96b079 2/3: * pyim.el (pyim-select-word-by-number


From: ELPA Syncer
Subject: [elpa] externals/pyim b96b079 2/3: * pyim.el (pyim-select-word-by-number): simplify.
Date: Sat, 18 Dec 2021 01:57:36 -0500 (EST)

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

    * pyim.el (pyim-select-word-by-number): simplify.
---
 pyim.el | 18 +++++++++++-------
 1 file changed, 11 insertions(+), 7 deletions(-)

diff --git a/pyim.el b/pyim.el
index 2024785..cd3115b 100644
--- a/pyim.el
+++ b/pyim.el
@@ -95,15 +95,19 @@ Tip: 用户也可以利用 `pyim-outcome-trigger-function-default' 函数
     (while (< i 256)
       (define-key map (vector i) #'pyim-self-insert-command)
       (setq i (1+ i)))
-    (dolist (i (number-sequence ?0 ?9))
-      (define-key map (char-to-string i) #'pyim-select-word-by-number))
+    (dolist (i (number-sequence 0 9))
+      (define-key map (kbd (number-to-string i))
+                  (lambda ()
+                    (interactive)
+                    (pyim-select-word-by-number i))))
     (dolist (x '(("<f1>" . 1)
                  ("<f2>" . 2)
                  ("<f3>" . 3)
                  ("<f4>" . 4)))
-      (define-key map (kbd (car x)) (lambda ()
-                                      (interactive)
-                                      (pyim-select-subword-by-number (cdr 
x)))))
+      (define-key map (kbd (car x))
+                  (lambda ()
+                    (interactive)
+                    (pyim-select-subword-by-number (cdr x)))))
     (define-key map " " #'pyim-select-word)
     (define-key map (kbd "C-SPC") #'pyim-select-word-simple)
     (define-key map [backspace] #'pyim-delete-backward-char)
@@ -619,9 +623,9 @@ FILE 的格式与 `pyim-dcache-export' 生成的文件格式相同,
             (pyim-process-terminate))
         (let ((index (if (numberp n)
                          (- n 1)
-                       (- last-command-event ?1)))
+                       0))
               (end (pyim-page-end)))
-          (if (= index -1) (setq index 9) nil)
+          (when (= index -1) (setq index 9))
           (if (> (+ index (pyim-page-start)) end)
               (pyim-page-refresh)
             (pyim-process-set-candidate-position



reply via email to

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