From 6e7836ffb7edffbc04dd945ddc70c08f511f0c0b Mon Sep 17 00:00:00 2001 From: KJ Date: Sat, 20 Apr 2024 23:34:47 -0400 Subject: [PATCH] Simplify cape shortcuts. --- configs/init-corfu.el | 10 ++++++---- 1 file changed, 6 insertions(+), 4 deletions(-) diff --git a/configs/init-corfu.el b/configs/init-corfu.el index 185999b..d9151e4 100644 --- a/configs/init-corfu.el +++ b/configs/init-corfu.el @@ -34,17 +34,19 @@ corfu-quit-no-match t) ) +;; Cambia la forma de mostrar y buscar sugerencias (afecta a corfu, pero también a otros como vertico). (use-package orderless :config (setq completion-styles '(flex orderless basic) completion-category-overrides '((file (styles partial-completion))))) +;; Set de funciones de para las sugerencias de corfu. (use-package cape :ensure (:host github :repo "minad/cape") :after corfu - :bind (("C-c f" . cape-file) - ("C-c l" . cape-line) - ("C-c _" . cape-tex)) + :bind (("C-c f" . cape-file) + ("C-c l" . cape-line) + ("C-c _" . cape-tex)) :init ;; (advice-add 'eglot-completion-at-point :around #'cape-wrap-buster) (advice-add #'eglot-completion-at-point :around #'cape-wrap-nonexclusive) @@ -52,8 +54,8 @@ ;; (add-to-list 'completion-at-point-functions #'cape-tex) ;; Completar Latex (caracteres unicode). (add-to-list 'completion-at-point-functions #'cape-dict) ;; Completar desde un diccionario (por defecto toma el de linux que está en /usr/share/dict/words). (add-to-list 'completion-at-point-functions #'cape-dabbrev) ;; Completar desde otras la palabras del buffer. - (add-to-list 'completion-at-point-functions #'cape-file) ;; Completar rutas de archivos. (add-to-list 'completion-at-point-functions #'cape-abbrev) ;; Completar desde una abreviaciónes configuradas con add-global-abbrev (añadir abreviación global) o add-mode-abbrev (abreviación para el modo actual). + (add-to-list 'completion-at-point-functions #'cape-file) ;; Completar rutas de archivos. (add-to-list 'completion-at-point-functions #'cape-keyword) ;; Completar desde keyword del lenguaje. )