[reorganize] org mode is its own section

1 files changed, 144 insertions, 122 deletions

diff --git a/init-el.org b/init-el.org
index f8bf973..331aeea 100644
--- a/init-el.org
+++ b/init-el.org
@@ -61,8 +61,8 @@ So, to use this file for the very first time you must
 (load custom-file 'noerror)
 
 <<packages-setup-config>>
-<<org-mode-configuration>>
 <<my-leader-keys-config>>
+<<org-mode-config>>
 <<ui-config>>
 <<communications-config>>
 <<time-management-config>>
@@ -93,37 +93,6 @@ So, to use this file for the very first time you must
 (package-install 'use-package)
 #+end_src
 
-** Org Mode and Babel Configuration
-
-
-#+name: org-mode-configuration
-#+begin_src elisp :results none
-
-(package-install 'org)
-(setq org-duration-format 'h:mm)
-
-(setq org-edit-src-content-indentation 0)
-
-(package-install 'graphviz-dot-mode)
-(package-install 'ob-haxe)
-
-(add-hook 'org-mode-hook
-          (lambda () (org-toggle-inline-images)))
-
-(org-babel-do-load-languages
- 'org-babel-load-languages
- '((emacs-lisp . t)
-   (lisp . t)
-   (haxe . t)
-   (dot . t)
-   (C . t)
-   (shell . t)))
-
-(add-to-list 'org-src-lang-modes
-             '("dot" . graphviz-dot))
-
-#+end_src
-
 * Leader Keys
 
 #+name: my-leader-keys-config
@@ -246,6 +215,146 @@ So, to use this file for the very first time you must
 
 
 
+* Org Mode Configs 
+
+#+name: org-mode-config
+#+begin_src elisp :noweb no-export
+<<org-mode-main-config>>
+<<org-mode-babel-config>>
+<<org-mode-leader-key-menu>>
+#+end_src
+
+** Org Mode Main Config
+
+#+name: org-mode-main-config
+#+begin_src elisp :noweb no-export
+(package-install 'org)
+(setq org-duration-format 'h:mm)
+
+(setq org-edit-src-content-indentation 0)
+
+(setq org-goto-interface 'outline-path-completion
+      org-goto-max-level 10
+      org-outline-path-complete-in-steps nil)
+
+(setq org-imenu-depth 10)
+
+(defun my-org-up-heading ()
+  (interactive)
+  (org-up-heading-safe))
+
+(defun my-org-down-heading ()
+  (interactive)
+  (org-down-element))
+
+(defun personal-log-insert ()
+  (interactive)
+  (org-insert-heading)
+  (delete-backward-char 1)
+  (insert "* ")
+  (insert (current-time-string)))
+
+(defun org-insert-internal-link (title)
+  (interactive "sHeading: ")
+  (insert "[[*")
+  (call-interactively 'complete-symbol)
+  (insert (format "][%s]]" title)))
+
+(defun org-insert-named-code-block (name lang)
+  (interactive "sName: \nsLanguage: ")
+  (insert "#+name: ")
+  (insert name)
+  (insert "\n")
+  (insert (format "#+begin_src %s :noweb no-export\n\n#+end_src" lang)))
+
+#+end_src
+
+** Org Mode and Babel Configuration
+
+
+#+name: org-mode-babel-config
+#+begin_src elisp :results none
+
+
+(package-install 'graphviz-dot-mode)
+(package-install 'ob-haxe)
+
+(add-hook 'org-mode-hook
+          (lambda () (org-toggle-inline-images)))
+
+(org-babel-do-load-languages
+ 'org-babel-load-languages
+ '((emacs-lisp . t)
+   (lisp . t)
+   (haxe . t)
+   (dot . t)
+   (C . t)
+   (shell . t)))
+
+(add-to-list 'org-src-lang-modes
+             '("dot" . graphviz-dot))
+
+#+end_src
+
+
+** My-Leader Key for Org Major Mode 
+#+name: org-mode-leader-key-menu
+#+begin_src elisp :results none :noweb no-export
+
+
+(def-my-command my-org-command
+  '((?/ "[/] sparse tree" org-sparse-tree)
+    (?g "[g]oto" org-goto)
+    (?u "[u]p heading" my-org-up-heading)
+    (?d "[d]own heading" my-org-down-heading)
+    (?p "[p]revious heading" org-previous-visible-heading)
+    (?n "[n]next heading" org-next-visible-heading)
+
+    (?r "Org [r]efile" org-refile)
+    (?k "Org [k]ut" org-cut-special)
+    (?s "Org [s]ort" org-sort)
+    (?A "Org [A]rchive" org-archive-subtree)
+
+
+    (?i "[i]insertion" my-org-insertion-subcommand)
+    (?E "[E]xport" my-org-export-subcommand)
+
+    (?e "[e]dit a code block" org-edit-src-code)
+        
+    (?N "[N]arrow" org-narrow-to-subtree)
+    (?W "[W]iden" widen)
+
+    (?I "[I]mages toggle" org-toggle-inline-images)
+
+    (?c "table re[c]alculate" org-table-recalculate)
+
+    (?C "[C]lock" my-org-clock-command)))
+
+
+(def-my-command my-org-clock-command
+  '((?c "[c]lock in" org-clock-in)
+    (?o "clock [o]ut" org-clock-out)
+    (?r "clock [r]eport" org-clock-report)))
+
+(def-my-command my-org-export-subcommand
+  '((?t "[t]angle file" org-babel-tangle)
+    (?e "[e]xport options" org-export-dispatch)))
+
+(def-my-command my-org-insertion-subcommand
+  '((?l "internal [l]ink" org-insert-internal-link)
+    (?L "external [L]ink" org-insert-link)
+    (?d "[d]ated log entry" personal-log-insert)
+    (?D "[D]eadline" org-deadline)
+    (?T "[T]imestamp" org-time-stamp)
+    (?f "[f]ootnote" org-footnote-new)
+    (?b "named code [b]lock" org-insert-named-code-block)
+    (?s "[s]tructure template" org-insert-structure-template)))
+
+#+end_src
+
+
+
+
 * UI 
 
 #+name: ui-config 
@@ -999,7 +1108,7 @@ mu index
 #+name: reading-notes-and-writing-config 
 #+begin_src elisp :noweb no-export  :results none
 
-<<org-mode-leader-key-menu>>
+
 <<calibre-config>>
 <<pdf-tools>>
 <<pdf-mode-config>>
@@ -1012,94 +1121,7 @@ mu index
 <<writeroom>>
 <<eww-config>>
 <<markdown-editing>>
-
-#+end_src
-
-** My-Leader Key for Org Major Mode 
-#+name: org-mode-leader-key-menu
-#+begin_src elisp :results none
-(defun personal-log-insert ()
-  (interactive)
-  (org-insert-heading)
-  (delete-backward-char 1)
-  (insert "* ")
-  (insert (current-time-string)))
-
-(defun org-insert-internal-link (title)
-  (interactive "sHeading: ")
-  (insert "[[*")
-  (call-interactively 'complete-symbol)
-  (insert (format "][%s]]" title)))
-
-(defun org-insert-named-code-block (name lang)
-  (interactive "sName: \nsLanguage: ")
-  (insert "#+name: ")
-  (insert name)
-  (insert "\n")
-  (insert (format "#+begin_src %s :noweb no-export\n\n#+end_src" lang)))
-
-(setq org-goto-interface 'outline-path-completion
-      org-goto-max-level 10
-      org-outline-path-complete-in-steps nil)
-
-(setq org-imenu-depth 10)
-
-(defun my-org-up-heading ()
-  (interactive)
-  (org-up-heading-safe))
-
-(defun my-org-down-heading ()
-  (interactive)
-  (org-down-element))
-
-(def-my-command my-org-command
-  '((?/ "[/] sparse tree" org-sparse-tree)
-    (?g "[g]oto" org-goto)
-    (?u "[u]p heading" my-org-up-heading)
-    (?d "[d]own heading" my-org-down-heading)
-    (?p "[p]revious heading" org-previous-visible-heading)
-    (?n "[n]next heading" org-next-visible-heading)
-
-    (?r "Org [r]efile" org-refile)
-    (?k "Org [k]ut" org-cut-special)
-    (?s "Org [s]ort" org-sort)
-    (?A "Org [A]rchive" org-archive-subtree)
-
-
-    (?i "[i]insertion" my-org-insertion-subcommand)
-    (?E "[E]xport" my-org-export-subcommand)
-
-    (?e "[e]dit a code block" org-edit-src-code)
-        
-    (?N "[N]arrow" org-narrow-to-subtree)
-    (?W "[W]iden" widen)
-
-    (?I "[I]mages toggle" org-toggle-inline-images)
-
-    (?c "table re[c]alculate" org-table-recalculate)
-
-    (?C "[C]lock" my-org-clock-command)))
-
-
-(def-my-command my-org-clock-command
-  '((?c "[c]lock in" org-clock-in)
-    (?o "clock [o]ut" org-clock-out)
-    (?r "clock [r]eport" org-clock-report)))
-
-(def-my-command my-org-export-subcommand
-  '((?t "[t]angle file" org-babel-tangle)
-    (?e "[e]xport options" org-export-dispatch)))
-
-(def-my-command my-org-insertion-subcommand
-  '((?l "internal [l]ink" org-insert-internal-link)
-    (?L "external [L]ink" org-insert-link)
-    (?d "[d]ated log entry" personal-log-insert)
-    (?D "[D]eadline" org-deadline)
-    (?T "[T]imestamp" org-time-stamp)
-    (?f "[f]ootnote" org-footnote-new)
-    (?b "named code [b]lock" org-insert-named-code-block)
-    (?s "[s]tructure template" org-insert-structure-template)))
-
+<<writefreely-config>>
 #+end_src
 
 ** Calibre db 
@@ -1446,7 +1468,7 @@ mu index
 #+RESULTS: eww-config
 : eww-browse-url
 
-** Markdown Eiditing 
+** Markdown Editing 
 
 #+name: markdown-editing
 #+begin_src elisp :noweb no-export