[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
[elpa] externals/pyim 4348aa3: * pyim.el (pyim-search-word-code): Use py
From: |
ELPA Syncer |
Subject: |
[elpa] externals/pyim 4348aa3: * pyim.el (pyim-search-word-code): Use pyim-cstring-to-codes. |
Date: |
Thu, 6 May 2021 09:57:13 -0400 (EDT) |
branch: externals/pyim
commit 4348aa34eb2b0106dee784c2b00f8ad12abd6893
Author: Feng Shu <tumashu@163.com>
Commit: Feng Shu <tumashu@163.com>
* pyim.el (pyim-search-word-code): Use pyim-cstring-to-codes.
---
pyim.el | 13 +++++++------
1 file changed, 7 insertions(+), 6 deletions(-)
diff --git a/pyim.el b/pyim.el
index d140d5e..63f77c9 100644
--- a/pyim.el
+++ b/pyim.el
@@ -838,17 +838,18 @@ FILE 的格式与 `pyim-dcache-export' 生成的文件格式相同,
;; ** 编码反查功能
(defun pyim-search-word-code ()
- "选择词条,然后反查它的 code. 这个功能对五笔用户有用。"
+ "选择词条,然后反查它的 code。"
(interactive)
(when (region-active-p)
(let* ((string (buffer-substring-no-properties (region-beginning)
(region-end)))
code)
(if (not (string-match-p "^\\cc+\\'" string))
- (error "不是纯中文字符串")
- (setq code (pyim-dcache-search-word-code string))
- (if code
- (message "%S -> %S " string code)
- (message "没有找到 %S 对应的编码。" string))))))
+ (error "PYIM: 不是纯中文字符串。")
+ (setq codes (pyim-cstring-to-codes string pyim-default-scheme))
+ (if codes
+ (message "PYIM (%S): %S -> %S" pyim-default-scheme string codes)
+ (message "PYIM: 没有找到 %S 对应的编码。" string)))
+ (deactivate-mark))))
;; ** pyim 中文字符串工具
(require 'pyim-cstring)
[Prev in Thread] |
Current Thread |
[Next in Thread] |
- [elpa] externals/pyim 4348aa3: * pyim.el (pyim-search-word-code): Use pyim-cstring-to-codes.,
ELPA Syncer <=