feat[date] Simplified date commands
I simplified and added an extra date command. I also fixed the eval-confirmation for elisp and shell links.
This commit is contained in:
parent
85556a13c0
commit
b55495cf0c
31
config.org
31
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
|
||||
|
Loading…
Reference in New Issue
Block a user