Minor edits.

.config/emacs/config.org

@@ -55,6 +55,7 @@
 - [[#tldr][TLDR]]
 - [[#transparency][TRANSPARENCY]]
 - [[#which-key][WHICH-KEY]]
+- [[#test][TEST]]
 
 * IMPORTANT PROGRAMS TO LOAD FIRST
 To keep this =config.org= a reasonable length, I have moved a lot of code to individual scripts that will be sourced by this config.  These scripts are found in "~/.config/emacs/scripts" and do not contain any code that most people are likely to need to edit.
@@ -702,9 +703,6 @@ NOTE For privacy reasons, I'm importing all of my mu4e settings from a separate
 (require 'mu4e)
 (load-file "~/nc/emacs-stuff/email-mu4e.el")
 
-;; The command used to get your emails (adapt this line, see section 2.3):
-(setq mu4e-get-mail-command "mbsync --config ~/.config/emacs/.mbsyncrc distrotube")
-
 #+end_src
 
 * NEOTREE
@@ -1029,3 +1027,38 @@ With Emacs version 29, true transparency has been added.  I have turned transpar
 	  which-key-separator " → " ))
 #+end_src
 
+
+* TEST
+#+begin_src emacs-lisp
+(defun reader ()
+  (interactive)
+  (let ((choices '(("First"  . "First")
+                   ("Second" . 'second-choice)
+                   ("Third"  . 'third-choice))))
+    (alist-get
+     (completing-read "Choose: " choices)
+     choices nil t 'equal)))
+
+(setq yy-keywords
+      '("touch"
+       "touch_start"
+       "touch_end"
+       "for"
+       "foreach"
+       "forall"
+       ))
+
+
+(defun github-code-search ()
+  "Search code on github for a given language."
+  (interactive)
+  (let ((language (completing-read
+                   "Language: "
+                   '("Emacs Lisp" "Python"  "Clojure" "R")))
+        (code (read-string "Code: ")))
+    (browse-url
+     (concat "https://github.com/search?l=" language
+             "&type=code&q=" code))))
+  
+#+end_src
+