making org bible actually kinda a thing

README.org

@@ -58,7 +58,7 @@
   - [[#activitywatch][ActivityWatch]]
   - [[#languagetool][LanguageTool]]
   - [[#qrencode][qrencode]]
-  - [[#mybible][MyBible]]
+  - [[#org-bible][Org Bible]]
   - [[#performance][Performance]]
   - [[#logging][Logging]]
 - [[#early-init][Early Init]]
@@ -5132,30 +5132,13 @@ I am going to try and use LanguageTool to fix grammatical issues.
 (use-package qrencode)
 #+end_src
 
-** MyBible
+** Org Bible
 :PROPERTIES:
 :ID:       20231221T141041.368526
 :END:
-MyBible is going to be set of functions for creating and using a bible app within Emacs. Let's see if we can't make it work.
+Org Bible is going to be set of functions for creating and using a bible app within Emacs. Let's see if we can't make it work.
 #+begin_src emacs-lisp
-(defvar bible-books '(genesis exodus leviticus numbers dueteronomy joshua judges ruth 1-samuel 2-samuel 1-kings 2-kings 1-chronicles 2-chronicles ezra nehemiah esther job psalms proverbs ecclesiastes song-of-solomon isaiah jeremiah lamentations ezekiel daniel hosea joel amos obadiah jonah micah nahum habakkuk zephaniah haggai zechariah malachi matthew mark luke john acts romans 1-corinthians 2-corinthians galatians ephesians phillipians colossians 1-thessalonians 2-thessalonians 1-timothy 2-timothy titus philemon hebrews james 1-peter 2-peter 1-john 2-john 3-john jude revelation))
-
-(defun chris/org-get-tree (&optional file)
-  "Get the tree of the current org buffer or optionally a file."
-  (interactive)
-  (let ((list nil))))
-
-(defun chris/make-chapters ()
-  (interactive)
-  (org-narrow-to-element)
-  (search-forward "chapter")
-  (beginning-of-line)
-  (insert "** "))
-
-(defun chris/find-verse ()
-  (interactive)
-  (org-ql-select "/home/chris/docs/bibles/esv.org" "Jesus")
-  (goto-char (cdr (imenu-choose-buffer-index))))
+(load (concat user-emacs-directory "bible.el"))
 #+end_src
 
 ** Performance