用猫大的 sdcv 查词,执行 sdcv-search-pointer 后光标会跳到解释窗口中,我想保持原位不动
找AI要了一段代码基本实现了,还存在的问题是第一次执行时它没能显示出来释义窗口
目前我是在第一次执行了手工 C-x 2 后再切到 SDCV 释义窗口再跳回,之后就正常了
请教该如何修改能实现呢
(defun my-sdcv-search-pointer (&optional word)
"Get current WORD.
Display complete translations in other buffer."
(interactive)
;; Save current window configuration
(setq original-window-config (current-window-configuration))
;; Display details translate result
(let ((search-word (or word (sdcv-region-or-word))))
(when search-word
(sdcv-search-detail search-word)))
;; Restore original window configuration
(set-window-configuration original-window-config))