diff options
| author | jao <jao@gnu.org> | 2021-12-03 02:05:16 +0000 | 
|---|---|---|
| committer | jao <jao@gnu.org> | 2021-12-03 02:05:16 +0000 | 
| commit | b250844980ae6af7f231f67e9f80507bc2b6b5dc (patch) | |
| tree | 6ba96d379f268404624bb8cf569d8dab7d3a59d3 | |
| parent | 28f9d947d900c85ab8bf1932339c59469fed0207 (diff) | |
| download | elibs-b250844980ae6af7f231f67e9f80507bc2b6b5dc.tar.gz elibs-b250844980ae6af7f231f67e9f80507bc2b6b5dc.tar.bz2  | |
attic
| -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")  | 
