（重新设计）中英文混打：OS输入法管理包 smart-input-source

fu123456 · 2023 年11 月 21 日 06:50

有对应配置参考吗？

LuciusChen · 2023 年11 月 21 日 07:03

主要是就是在 meow 中根据 meow-insert-mode-hook 写了个进入和离开 insert-mode 的 hook，参考

LuciusChen/.emacs.d/blob/main/lisp/init-edit-util.el#L33


      
                                              (?<  . angle)
                                              (?>  . angle)
                                              (?{  . curly)
                                              (?}  . curly)
                                              (?s  . symbol)
                                              (?f  . defun)
                                              (?w  . window)
                                              (?l  . line)
                                              (?b  . buffer)
                                              (?p  . paragraph)))
            (:hooks meow-insert-mode-hook
                    (lambda ()
                      (if meow-insert-mode
                          (run-hooks 'meow-entering-insert-mode-hook)
                        (run-hooks 'meow-leaving-insert-mode-hook))))
            (meow-normal-define-key (cons "\\" wrap-keymap)))
          
          
(setup sis
            ;; brew tap daipeihust/tap
            ;; brew install im-select
            (:option sis-external-ism "im-select"

然后加了

(add-to-list 'sis-context-hooks 'meow-entering-insert-mode-hook)
(add-hook meow-leaving-insert-mode-hook #'sis-set-english)

这样退出 insert-mode 就可以了。

另外从其他应用切换回来时，有时候也会带过来中文输入法。加了下面 focus 的时候触发

(defun lucius/meow-focus-change-function ()
    (if (frame-focus-state)
        (sis-set-english)
      (meow-insert-exit)))

  (add-function :after after-focus-change-function 'lucius/meow-focus-change-function)

fu123456 · 2023 年11 月 21 日 07:25

好，感谢。

goumao · 2023 年11 月 22 日 16:02

after-focus-change-function 代码中处理了的。

github.com

laishulu/emacs-smart-input-source/blob/24bb3bca50c67855eba077aeeb3af86c18569aae/sis.el#L1062


      
          (when sis-respect-prefix-and-buffer
            ;; preserve buffer input source
            (add-hook 'pre-command-hook #'sis--respect-pre-command-handler)
            (add-hook 'post-command-hook #'sis--respect-post-command-handler)
            (add-hook 'minibuffer-setup-hook #'sis--minibuffer-setup-handler)
            (add-hook 'minibuffer-exit-hook #'sis--minibuffer-exit-handler)
          
          
  (unless (boundp 'after-focus-change-function)
              (setq after-focus-change-function (lambda ())))
          
          
  (advice-add 'after-focus-change-function :after
                        #'sis--respect-focus-change-advice)
          
          
  ;; enable terminal focus event
            (unless (display-graphic-p)
              (require 'terminal-focus-reporting)
              (terminal-focus-reporting-mode t)
              (advice-add 'handle-focus-in :after
                          #'sis--respect-focus-in-advice)
              (advice-add 'handle-focus-out :after
                          #'sis--respect-focus-out-advice))

但是有时候还是不行？？

goumao · 2023 年11 月 22 日 16:08

macOS系统里有个设置，不知道你有没有设：

系统设置》键盘》文字输入》输入法：编辑》自动切换到文稿的输入法。

LuciusChen · 2023 年11 月 23 日 00:43

很早以前就有么？

goumao · 2023 年11 月 23 日 00:55

对，从最开始就有。

这个是GUI的focus处理， 1066行还有对terminal的focus的处理。

LuciusChen · 2023 年11 月 23 日 01:14

我想起来了，我的这个加在这里主要是为了离开 Emacs 的时候统一退出到 normal mode，至于为什么这么做，好像是以前从其他 app 回来会有点问题，我从 macsim 换成了 im-select，就不会有之前 macsim 切换输入法错误的问题了，有空我把这些 hack 去掉再试试。

fu123456 · 2023 年11 月 23 日 02:32

一切都正常，除了在中文环境中输入不了中文，其他功能都可以，这一点怎么回事。我的emacs现在使用的是emacs-mac 29版本的（Mac系统），之前在emacs plus 29上还是可以正常使用的。对应的配置基本上就是包说明文档中的默认配置。mac系统权限也给其权限了。 emacs

fu123456 · 2023 年11 月 23 日 02:36

emacs-mac安装包从这里下载：Releases · railwaycat/homebrew-emacsmacport · GitHub 难道不支持？