add more documentation

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))
@@ -1522,12 +1528,20 @@ Configure Geiser and Scheme
       :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))
+      (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