From 6c0f7d1c91b8741d760d6052f5ff89d966876cec Mon Sep 17 00:00:00 2001
From: jao <jao@gnu.org>
Date: Tue, 27 Apr 2021 06:15:57 +0100
Subject: completion: corfu and dabbrev

---
 completion.org | 18 ++++++++++--------
 1 file changed, 10 insertions(+), 8 deletions(-)

(limited to 'completion.org')

diff --git a/completion.org b/completion.org
index 1f1718f..4f5787c 100644
--- a/completion.org
+++ b/completion.org
@@ -19,22 +19,24 @@
             orderless-matching-styles
             '(orderless-literal orderless-regexp orderless-initialism)))
   #+end_src
-* corfu
+* corfu and dabbrev
   #+begin_src emacs-lisp
     (jao-load-path "corfu")
     (use-package corfu
 
-      :init (setq corfu-cycle t)
+      :init (setq corfu-cycle t
+                  corfu-excluded-modes nil)
+
+      :config (corfu-global-mode)
 
       :bind (:map corfu-map
              ("TAB" . corfu-next)
-             ("S-TAB" . corfu-previous))
+             ("S-TAB" . corfu-previous)))
 
-      :hook ((eshell-mode . corfu-mode)
-             (haskell-interactive-mode . corfu-mode)
-             (message-mode . corfu-mode)
-             (prog-mode . corfu-mode)
-             (lisp-interaction-mode . corfu-mode)))
+    (use-package dabbrev
+      ;; Swap M-/ and C-M-/
+      :bind (("M-/" . dabbrev-completion)
+             ("C-M-/" . dabbrev-expand)))
   #+end_src
 * vertico
   #+begin_src emacs-lisp
-- 
cgit v1.2.3