feat(org): Update agenda commands and denote file filtering

lisp/init-kbd-func.el

@@ -115,7 +115,7 @@ otherwise toggle global-jinx-mode."
 (defun my-denote-find-file ()
   "Find file use denote-file-prompt."
   (interactive)
-  (let ((denote-excluded-files-regexp "=journal"))
+  (let ((denote-excluded-files-regexp "=journal\\|=archive"))
     (find-file (denote-file-prompt))))
 
 (defun my-denote-find-backlink-with-location ()

lisp/init-org.el

@@ -27,6 +27,8 @@
        (0 (prog1 () (add-text-properties (match-beginning 1) (match-end 1) '(invisible t)))))))
   (font-lock-add-keywords 'org-mode org-hide-space-keywords 'append)
 
+  (add-to-list 'org-src-lang-modes '("yaml" . yaml-ts))
+
   (if *is-windows*
       (add-hook 'org-mode-hook 'font-lock-update))
 
@@ -154,18 +156,22 @@
   :hook
   (org-agenda-finalize . disable-truncate-lines)
   :config
+  (setq org-agenda-prefix-format '((agenda . "  %?-12t% s")
+                                 (todo . "  ")
+                                 (tags . "  ")
+                                 (search . "  ")))
   (setq org-agenda-custom-commands
         '(("qd" "TODO entries sort by closed time"
            ((org-ql-block '(closed)
                           ((org-ql-block-header "Closed TODOs")
                            (org-super-agenda-groups
                             '((:auto-ts t)))))))
-          ("qs" "SOMEDAYs"
+          ("qS" "SOMEDAYs"
            ((org-ql-block '(todo "SOMEDAY")
                           ((org-ql-block-header "SOMEDAYs")
                            (org-super-agenda-groups
                             '((:auto-ts t)))))))
-          ("qS" "STARTEDs"
+          ("qs" "STARTEDs"
            ((org-ql-block '(todo "STARTED")
                           ((org-ql-block-header "STARTEDs")
                            (org-super-agenda-groups