From 2d9f9af4df6b5793ac32755973dbfd1b908acd37 Mon Sep 17 00:00:00 2001 From: Thanos Apollo Date: Wed, 6 Nov 2024 06:10:49 +0200 Subject: emacs: Add cape. --- .config/emacs/init.el | 12 +++++++++++- 1 file changed, 11 insertions(+), 1 deletion(-) (limited to '.config') diff --git a/.config/emacs/init.el b/.config/emacs/init.el index 52cbd0a..8a017bd 100644 --- a/.config/emacs/init.el +++ b/.config/emacs/init.el @@ -677,6 +677,16 @@ rss.xml" anna piracy) (when (or is-phone is-uranus) (use-package corfu-terminal)) +(use-package cape + ;; Press C-c p ? to for help. + :bind ("M-p" . cape-prefix-map) ;; Alternative keys: M-p, M-+, ... + :config + ;; (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-dict) + ) + (defun insert-brackets (&optional arg) "Insert ARG brackets." (interactive "P") @@ -1392,7 +1402,7 @@ Create a temporary frame to execute BODY, which will then be deleted." (interactive "nStart: \nnEnd: ") (dotimes (i (1+ (- end str))) (insert (format "%s" (+ i str))) - (org-return))) + (org-table-hline-and-move))) (use-package greek-polytonic :straight (greek-polytonic :local-repo "~/Dev/emacs-lisp/greek-polytonic")) -- cgit v1.2.3