[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
[elpa] externals/pyim 4a63750 3/4: * pyim.el (pyim-convert-string-at-poi
From: |
ELPA Syncer |
Subject: |
[elpa] externals/pyim 4a63750 3/4: * pyim.el (pyim-convert-string-at-point): Remove useless code. |
Date: |
Tue, 27 Apr 2021 08:57:10 -0400 (EDT) |
branch: externals/pyim
commit 4a637507b273660ad8f99e82845339c68b07e5c5
Author: Feng Shu <tumashu@163.com>
Commit: Feng Shu <tumashu@163.com>
* pyim.el (pyim-convert-string-at-point): Remove useless code.
---
pyim.el | 23 -----------------------
1 file changed, 23 deletions(-)
diff --git a/pyim.el b/pyim.el
index 3dd387b..d2c12c5 100644
--- a/pyim.el
+++ b/pyim.el
@@ -800,29 +800,6 @@ FILE 的格式与 `pyim-dcache-export' 生成的文件格式相同,
((pyim-string-match-p "[[:punct:]:-]" (pyim-char-before-to-string
0))
;; 当光标前的一个字符是标点符号时,半角/全角切换。
(call-interactively 'pyim-punctuation-translate-at-point))
- ((and nil ;; 暂时还没有准备启用这个功能
- (eq pyim-default-scheme 'quanpin)
- (string-match "\\cc *$" string))
- ;; 如果光标处是汉字,就用汉字的拼音来重新启动输入法
- (setq string
- (if mark-active
- string
- (match-string 0 string)))
- (setq length (length string))
- (when mark-active
- (delete-region
- (region-beginning) (region-end)))
- (when (and (not mark-active) (> length 0))
- (delete-char (- 0 length)))
- (setq code (pyim-cstring-to-pinyin
- (replace-regexp-in-string " " "" string)
- nil "-" nil t))
- (when (and (> code 0)
- (> length 0))
- (setq unread-command-events
- (append (listify-key-sequence code)
- unread-command-events))
- (setq pyim-force-input-chinese t)))
(t (message "Pyim: pyim-convert-string-at-point do noting."))))))
;; ** 编码反查功能