[讨论] lsp版的company-capf截获了本该属于company-dabbrev的补全任务

Emacs-general
,
3

Advice:

(defun lsp:completion-options-trigger-characters?@remove-quotes (orig-fn obj)
  (let ((chars (funcall orig-fn obj)))
    (if (nth 3 (syntax-ppss)) ;; point at string
        (remove "\"" chars)
      chars)))

(advice-add 'lsp:completion-options-trigger-characters?
            :around #'lsp:completion-options-trigger-characters?@remove-quotes)