diff --git a/init.org b/init.org index 0d3a72e..ef58186 100644 --- a/init.org +++ b/init.org @@ -28,7 +28,13 @@ stat /gnu/store/*emacs-next-[23]*.drv | rg Birth | cut -d' ' -f3 | tr -d '-' It is possible there are more so probably the most recent one is the one to use. +** Inspiration Sources +- [[https://pages.sachachua.com/.emacs.d/Sacha.html][Sacha Chua's Emacs config]] +- [[https://github.com/jwiegley/use-package][GitHub repo for use-package]] +- [[https://github.com/jwiegley/dot-emacs/blob/master/init.org][John Wiegley's .emacs file]] +- [[https://github.com/TheBB/dotemacs/blob/master/init.el][Eivind Fonn's init.el]] +- * First Things First *** Make tangled file read-only @@ -353,7 +359,7 @@ muscle memory. (lambda (f) (find-font (font-spec :family f))) fonts)) - (defun pti-configure-fonts () + (defun pti-configure-fonts (&optional frame) "Set configuration of fonts based on display size." (defvar pti-font-size (if (> (display-pixel-height) 1600) 22 14)) @@ -1518,16 +1524,24 @@ Configure Geiser and Scheme *** Copilot Support #+BEGIN_SRC emacs-lisp - (use-package copilot - :ensure (:host github :repo "zerolfx/copilot.el" - :branch "main" - :files ("dist" "*.el")) - :hook - (prog-mode . copilot-mode)) + (use-package copilot + :ensure (:host github :repo "zerolfx/copilot.el" + :branch "main" + :files ("dist" "*.el")) + :bind + (:map evil-insert-state-map + ("C-y" . copilot-accept-completion)) + :config + (add-to-list 'copilot-indentation-alist '(scheme-mode . 2)) + (add-to-list 'copilot-indentation-alist '(emacs-lisp-mode . 2)) + (add-to-list 'copilot-indentation-alist '(lisp-mode . 2)) + :hook + (prog-mode . copilot-mode) + (org-mode . copilot-mode)) #+END_SRC #+RESULTS: -: [nil 26279 35677 893347 nil elpaca-process-queues nil nil 951000 nil] +: [nil 26280 62042 380168 nil elpaca-process-queues nil nil 930000 nil] **** TODO move scheme configuration to the scheme section or leave it here but move it to config, whatever makes most sense at