diff options
| -rw-r--r-- | attic/misc.org | 62 | ||||
| -rw-r--r-- | completion.org | 28 |
2 files changed, 62 insertions, 28 deletions
diff --git a/attic/misc.org b/attic/misc.org index 66e0012..b2b9e6e 100644 --- a/attic/misc.org +++ b/attic/misc.org @@ -797,3 +797,65 @@ ("k" "Kill buffer" kill-buffer)])) #+end_src +* cape + #+begin_src emacs-lisp + (use-package cape + :ensure t + ;; Bind dedicated completion commands + :bind (("C-c p p" . completion-at-point) ;; capf + ("C-c p t" . complete-tag) ;; etags + ("C-c p d" . cape-dabbrev) ;; or dabbrev-completion + ("M-/" . cape-dabbrev) + ("C-c p f" . cape-file) + ("C-c p k" . cape-keyword) + ("C-c p s" . cape-symbol) + ("C-c p a" . cape-abbrev) + ("C-c p i" . cape-ispell) + ("C-c p l" . cape-line) + ("C-c p w" . cape-dict)) + :init + ;; Add `completion-at-point-functions', used by `completion-at-point'. + (add-to-list 'completion-at-point-functions #'cape-file) + ;; (add-to-list 'completion-at-point-functions #'cape-dabbrev) + ;; (add-to-list 'completion-at-point-functions #'cape-keyword) + ;;(add-to-list 'completion-at-point-functions #'cape-abbrev) + ;;(add-to-list 'completion-at-point-functions #'cape-ispell) + ;;(add-to-list 'completion-at-point-functions #'cape-dict) + ;;(add-to-list 'completion-at-point-functions #'cape-symbol) + ;;(add-to-list 'completion-at-point-functions #'cape-line) + ) + #+end_src +* vertico + #+begin_src emacs-lisp :tangle no + (use-package vertico-directory + :after vertico) + + (use-package vertico-repeat + :after vertico + :config (add-hook 'minibuffer-setup-hook #'vertico-repeat-save) + :bind (("M-R" . vertico-repeat))) + + (use-package vertico-buffer + :after vertico + :init (setq vertico-buffer-display-action + '(display-buffer-at-bottom + (window-height . ,(+ 3 vertico-count))))) + + (use-package vertico + :ensure t + :init + (setq vertico-count 20 + vertico-cycle t + ; vertico-group-format nil + org-refile-use-outline-path t) + :config + (setq read-extended-command-predicate + #'command-completion-default-include-p) + + :bind (:map vertico-map (("RET" . vertico-directory-enter) + ("M-<backspace>" . vertico-directory-delete-word) + ("<backspace>" . vertico-directory-delete-char)))) + + (vertico-buffer-mode -1) + (vertico-mode -1) + #+end_src diff --git a/completion.org b/completion.org index e24a0da..0c14df1 100644 --- a/completion.org +++ b/completion.org @@ -81,34 +81,6 @@ (corfu-global-mode 1) #+end_src -* vertico - #+begin_src emacs-lisp :tangle no - (jao-load-path "vertico/extensions") - (use-package vertico-directory - :after vertico) - - (use-package vertico-repeat - :after vertico - :config (add-hook 'minibuffer-setup-hook #'vertico-repeat-save) - :bind (("M-R" . vertico-repeat))) - - (use-package vertico - :ensure t - :init - (setq vertico-count 20 - vertico-cycle t - ; vertico-group-format nil - org-refile-use-outline-path t) - :config - (setq read-extended-command-predicate - #'command-completion-default-include-p) - - :bind (:map vertico-map (("RET" . vertico-directory-enter) - ("M-<backspace>" . vertico-directory-delete-word) - ("<backspace>" . vertico-directory-delete-char)))) - - ;; (vertico-mode 1) - #+end_src * mct #+begin_src emacs-lisp (jao-load-path "mct") |