From b55495cf0cab3b9f1aa419e13da8d95b7727cada Mon Sep 17 00:00:00 2001
From: J S <judah@freedomland.xyz>
Date: Fri, 12 Apr 2024 12:21:45 -0400
Subject: [PATCH] feat[date] Simplified date commands

I simplified and added an extra date command.
I also fixed the eval-confirmation for elisp and shell links.
---
 config.org | 31 ++++++++++++++++++-------------
 1 file changed, 18 insertions(+), 13 deletions(-)

diff --git a/config.org b/config.org
index 74b7496..439e3a3 100644
--- a/config.org
+++ b/config.org
@@ -157,14 +157,17 @@ I want to grab the current date and put it in the buffer.
 Because I sometimes use Fish or another shell, it's good to make sure bash is running the command using the src_bash{`-c`}  flag.
 #+begin_src emacs-lisp
 (defun current-date () (interactive)
-    (shell-command-to-string " bash -c 'echo -n $(date +%Y-%m-%d)'"))
+    (shell-command-to-string "date '+%Y-%m-%d'"))
+
  (defun insert-current-date () (interactive)
-    (insert (current-date)))
+    (insert (string-trim (current-date))))
 
 (map! :leader
       :desc "Insert the current date into the buffer"
       "i d" #'insert-current-date)
 #+end_src
+
+#+RESULTS:
 ** Convert regex strings to rx
 #+begin_src elisp :tangle packages.el
 (package! xr)
@@ -227,11 +230,15 @@ The final two lines concern local variables, which may try to evaluate code.
 Emacs has better default values now, so it will ask to evaluate local variables.
 #+begin_src emacs-lisp
 (setq org-confirm-babel-evaluate t)
-(setq org-link-shell-confirm-function t)
-(setq org-link-elisp-confirm-function t)
+(setq org-link-shell-confirm-function 'yes-or-no-p)
+(setq org-link-elisp-confirm-function 'yes-or-no-p)
 (setq enable-local-variables t)
 (setq enable-local-eval 'maybe)
 #+end_src
+
+#+RESULTS:
+: maybe
+
 #+begin_src emacs-lisp
     (setq templates/post-capture-props "#+date: [%<%Y-%m-%d %a>]\n#+lastmod:\n#+categories[]:\n#+tags[]:\n#+images[]: ")
     (setq templates/post-capture-title "#+TITLE: ${title}\n")
@@ -317,23 +324,25 @@ Super-agenda allows many nice configurations to the agenda buffer.
 #+begin_src emacs-lisp :tangle "packages.el"
 (package! org-super-agenda)
 #+end_src
+Is it working now? It sure seems to be, so IDK what was up with it earlier.
+#+begin_src emacs-lisp
+(use-package! org-super-agenda
+  :after org-roam)
+#+end_src
 
 Configure the Super Agenda to neatly organize everything.
 #+begin_src emacs-lisp
-
 (setq org-super-agenda-groups
        '(;; Each group has an implicit boolean OR operator between its selectors.
 
-
          (:name "Calendar"
                  :and (:todo nil :not (:scheduled (before "2024-03-17")) :not (:deadline (before "2024-03-17")))
                  :order 10)
 
-
-
          (:name "Today"  ; Optionally specify section name
           :time-grid t  ; Items that appear on the time grid
           :todo "TODAY")  ; Items that have this TODO keyword
+
          (:name "Important"
           ;; Single arguments given alone
           :tag "bills"
@@ -343,7 +352,6 @@ Configure the Super Agenda to neatly organize everything.
                 :not (:scheduled (after "2024-03-17"))
                 :deadline (after "2024-03-17")))
 
-
          (:name "School"
           :tag "school" )
 
@@ -375,10 +383,7 @@ Configure the Super Agenda to neatly organize everything.
           ;; Show this section after "Today" and "Important", because
           ;; their order is unspecified, defaulting to 0. Sections
           ;; are displayed lowest-number-first.
-          :order 1)
-         ;; After the last group, the agenda will display items that didn't
-         ;; match any of these groups, with the default order position of 99
-         ))
+          :order 1)))
 #+end_src
 
 ** org-edna