;ELC ;;; Compiled ;;; in Emacs version 26.3 ;;; with all optimizations. ;;; This file contains utf-8 non-ASCII characters, ;;; and so cannot be loaded into Emacs 22 or earlier. (and (boundp 'emacs-version) (< (aref emacs-version (1- (length emacs-version))) ?A) (string-lessp emacs-version "23") (error "`%s' was compiled for Emacs 23 or later" #$)) ;;;;;;;;;;;;;;;;;;;;;;;;;;;;; (byte-code "\300\301!\210\300\302!\210\300\303!\210\300\304!\210\305\306\307\310\311\312%\210\313\306\314\315\316DD\317\320\321%\207" [require cl-lib pyim-scheme pyim-entered pyim-candidates custom-declare-group pyim-autoselector nil "Autoselector for pyim." :group pyim custom-declare-variable funcall function #[0 "\300\207" [(pyim-autoselector-xingma)] 1] "已经启用的自动上屏器.\n\n自动上屏器是一个函数。假设用户已经输入 \"nihao\", 并按下 \"m\" 键,\n那么当前entered 就是 \"nihaom\". 上次 entered 是 \"nihao\". 那么\n返回值有3种情况(优先级按照下面的顺序):\n\n1. (:select last :replace-with \"xxx\") 自动上屏上次\nentered (nihao) 的第一个候选词,m 键下一轮处理。\n\n2. (:select current :replace-with \"xxx\") 自动上屏当前\nentered (nihaom) 的第一个候选词。\n\n3. nil 不自动上屏。\n\n如果 :replace-with 设置为一个字符串,则选择最终会被这个字符串替代。\n\n注意:多个 autoselector 函数运行时,最好不要相互影响,如果相互有\n影响,需要用户自己管理。" :type (choice (const nil) (repeat function))] 6) #@224 适用于型码输入法的自动上屏器. 比如:五笔等型码输入法,重码率很低,90%以上的情况都是选择第一个词 条,自动选择可以减少按空格强制选词的机会。 (fn &rest ARGS) (defalias 'pyim-autoselector-xingma #[128 "\302 \303\304\"\303\305\"\306\307!\310=\205M\211GU\203,G\311U\203,\211@\232\204,\312\202M\211GV\203A\211\313O @\232\203A\314\202M\211GV\203L\315\202M\316\207" [pyim-candidates pyim-candidates-last pyim-scheme-name pyim-scheme-get-option :class :code-split-length pyim-entered-get point-before xingma 1 (:select current) 0 (:select last :replace-with "") (:select last) nil] 8 (#$ . 1579)]) (provide 'pyim-autoselector)