把 C-e 绑定到 (or (copilot 补全) (原本的 C-e 函数)) 后，按住 shift C-e 不能选择文字

[cireu]

 ;;;###autoload
 (defun copilot-accept-or-forward ()
   "Accept copilot completion or jumps"
-  (interactive)
+  (interactive "^")
    (or (copilot-accept-completion)
       (doom/forward-to-last-non-comment-or-eol)))

interactive 文档提示

If the string begins with ^ and shift-select-mode is non-nil,
 Emacs first calls the function handle-shift-selection.