disable dabbrev in certain modes?

[mooseyboots]

i'm using corfu (and cape) with a very basic config lifted from the recommendations in the docs.

i would like to exclude dabbrev suggestions from appearing automatically as i write in text/org modes. i'm happy with having it available with its usual M-/ and C-M-/ bindings.

how do i go about achieving that? with company i used to remove it from the backends as needed.

my config:

(use-package corfu
  :bind (:map corfu-map
              (("<tab>" . corfu-expand))) ;; max common substr
  :config
  (global-corfu-mode)
  (setq corfu-auto t)
  (setq corfu-popupinfo-mode t))

(use-package cape
  :bind ("C-c e" . cape-prefix-map)
  :init
  ;; (add-hook 'completion-at-point-functions #'cape-dabbrev)
  (add-hook 'completion-at-point-functions #'cape-file)
  (add-hook 'completion-at-point-functions #'cape-elisp-block)
  ;; (add-hook 'completion-at-point-functions #'cape-history)
  )

[jdtsmith]

Is cape-dabbrev still on completion-at-point-functions? Maybe you need to restart if so.

[mooseyboots]

no it's not.

in a lisp prog mode, completion-at-point-functions looks like:

(cape-elisp-block
 cape-file
 tags-completion-at-point-function)

while in org mode (where i want to disable dabbrev) it is:

(pcomplete-completions-at-point
 t
 ispell-completion-at-point)

but i still have auto complete being triggered with dabbrev results while i write.

[jdtsmith]

That t means to consult the global value. What is that?

But also, org's use of pcomplete includes the following:

When point is anywhere else, complete dictionary words using Ispell.

So it's probably not dabbrev.

And FYI, Corfu is just a UI for completions. It does not generate them. So typically if you're having trouble with the content of your completions you need to pursue that at the source (here, org).

[mooseyboots]

thanks for the details. i'm aware my past use of company is adding to my confusion.

you are correct that it is ispell completions that i'm getting.

it's not to do with org, but text-mode, which now adds ispell completion by default, with no user option.

this is my issue: https://lists.gnu.org/archive/html/bug-gnu-emacs/2023-11/msg01638.html.

my workaround:

(use-package corfu
  :bind (:map corfu-map
              (("<tab>" . corfu-expand))) ;; max common substr
  :hook (text-mode .
                   (lambda ()
                     (setq-local corfu-auto nil)))

thanks for the help!