New Custom Functions, Org Updates, Agenda Updates, &c.

=== Functions ===
- add function cj/dired-convert-image-to-jpeg
- add function cj/dired-copy-path-as-kill
- add function cj/export-org-to-md-on-save function
- add function cj/org-link-to-current-file

=== Agenda ===
- rework the f8 main agenda into custom agenda using Aaron Bieber's ideas
- agenda lists now use standard agenda functions
- updated packages to remove org-super-agenda and ts (a dependency)
- file commentary text  updated to reflect the change

=== Org ===
- add grocery and shopping list capture items
- add missing tests for org-skip-subtree-if-habit
- add support for org-habits, including checkboxes
- fix issue with org-auto-export-to-md
- modularize org-agenda
- move todo settings to org-config
- reformat org-roam-config

=== &c. ===
- add day to sortable date
- add disablefastrenderer to hugo server flags
- add fill column indicator when emacs lisping
- add gpt buffers to the bury-alive-list
- add keybinding for fixup-whitespace
- add magit cloning settings
- finish automatically on "Link" capture
- fix company complaints about shutting up function
- fix em, e, ff, and f eshell aliases
- make fallback theme modus-vivendi
- prune the compilation cache when applicable

1 files changed, 34 insertions, 8 deletions

diff --git a/modules/org-capture-config.el b/modules/org-capture-config.el
index 8feab2bf..4fa7af41 100644
--- a/modules/org-capture-config.el
+++ b/modules/org-capture-config.el
@@ -78,31 +78,57 @@ Intended to be called within an org capture template."
   ;; ORG-CAPTURE TEMPLATES
   (setq org-protocol-default-template-key "L")
   (setq org-capture-templates
-        '(
+        '(("t" "Task" entry (file+headline inbox-file "Inbox")
+           "* TODO %?" :prepend t)
+
           ("e" "Event" entry (file+headline schedule-file "Scheduled Events")
            "* %?\nWHEN: %^t" :prepend t)
 
           ("E" "Epub Text" entry (file+headline inbox-file "Inbox")
-           "* %?\n#+BEGIN_QUOTE\n %i\n#+END_QUOTE\nSource: [[%:link][%(buffer-name (org-capture-get :original-buffer))]]\nCaptured On: %U" :prepend t)
+           "* %?
+#+BEGIN_QUOTE\n %i\n#+END_QUOTE
+Source: [[%:link][%(buffer-name (org-capture-get :original-buffer))]]
+Captured On: %U" :prepend t)
 
           ("P" "PDF Text" entry (file+headline inbox-file "Inbox")
-           "* %?\n#+BEGIN_QUOTE\n %(org-capture-pdf-active-region)\n#+END_QUOTE\nSource:[[%L][%(buffer-name (org-capture-get :original-buffer))]]\nCaptured On: %U" :prepend t)
+           "* %?
+#+BEGIN_QUOTE\n%(org-capture-pdf-active-region)\n#+END_QUOTE
+Source:[[%L][%(buffer-name (org-capture-get :original-buffer))]]
+Captured On: %U" :prepend t)
 
           ("p" "Link with Selection" entry (file+headline inbox-file "Inbox")
-           "* TODO %?\n#+BEGIN_QUOTE\n%i\n#+END_QUOTE\n[[%:link][%:description]]\nCaptured On: %U" :prepend t)
+           "* %?%:description
+#+BEGIN_QUOTE\n%i\n#+END_QUOTE
+[[%:link][%:description]]
+Captured On: %U\n" :prepend t)
 
           ("L" "Link" entry (file+headline inbox-file "Inbox")
-           "* TODO %?\n[[%:link][%:description]]\nCaptured On: %U" :prepend t)
+           "* %?%:description
+[[%:link][%:description]]\nCaptured On: %U" :prepend t :immediate-finish t)
 
           ("m" "Mu4e Email" entry (file+headline inbox-file "Inbox")
-           "* TODO %?%(if (string= \"%i\" \"\") \"\" \"\n#+BEGIN_QUOTE\n%i\n#+END_QUOTE\")\n[[%:link][%:description]]\nCaptured On: %U"
+           "* TODO %?
+%(if (string= \"%i\" \"\") \"\" \"\n#+BEGIN_QUOTE\n%i\n#+END_QUOTE\")
+[[%:link][%:description]]
+Captured On: %U"
            :prepend t)
 
-		  ("w" "Web Page Clipper" plain
-		   (function cj/org-webpage-clipper)
+          ("g" "Grocery List Item" item
+           (file+headline inbox-file "Grocery List") "%?")
+
+          ("s" "Shopping List Entry" entry
+           (file+headline inbox-file "Shopping List") "* %?")
+
+          ("w" "Web Page Clipper" plain
+           (function cj/org-webpage-clipper)
            "* %a\nArticle Link: %L\nCaptured On: %U\n\n" :immediate-finish t)))
 
   ) ;; end with-eval-after-load 'org
 
+;; ---------------------------- Simple Task Capture ----------------------------
+;; the simplest way to capture a task. Also a simple way to write this function.
+
+(define-key global-map (kbd "C-S-t") (kbd "C-c c t"))
+
 (provide 'org-capture-config)
 ;;; org-capture-config.el ends here.