feat(sterni/emacs): binds for refiling and archiving subtrees in org

Archive to a single archive file that is ignored in org-agenda.
Archiving that “stays close” can be done using the archive tag.

Change-Id: Icd121a765e5befa0ab2f6df662d757483c65efa5
Reviewed-on: https://cl.tvl.fyi/c/depot/+/13049
Autosubmit: sterni <sternenseemann@systemli.org>
Reviewed-by: sterni <sternenseemann@systemli.org>
Tested-by: BuildkiteCI
This commit is contained in:
sterni 2025-01-24 20:31:02 +01:00 committed by clbot
parent 9f6d4306f7
commit 78b05b5448

View file

@ -120,8 +120,11 @@
(setq org-clock-persist 'history) (setq org-clock-persist 'history)
(org-clock-persistence-insinuate) (org-clock-persistence-insinuate)
(let ((org-folder (concat (getenv "HOME") "/files/sync/org"))) (let* ((org-folder (concat (getenv "HOME") "/files/sync/org"))
(setq org-agenda-files (directory-files-recursively org-folder "\\.org$") (org-archive-file (concat org-folder "/archive.org")))
(setq org-archive-location (concat org-archive-file "::")
org-agenda-files (remove org-archive-file
(directory-files-recursively org-folder "\\.org$"))
org-default-notes-file (concat org-folder "/context.org") org-default-notes-file (concat org-folder "/context.org")
initial-buffer-choice org-default-notes-file initial-buffer-choice org-default-notes-file
org-refile-targets '((org-agenda-files . (:maxlevel . 2))))) org-refile-targets '((org-agenda-files . (:maxlevel . 2)))))
@ -233,7 +236,10 @@
(display-fill-column-indicator-mode 'toggle))) (display-fill-column-indicator-mode 'toggle)))
;; org-mode ;; org-mode
(evil-define-key 'normal 'global (kbd "<leader>oa") 'org-agenda) (evil-define-key 'normal 'global (kbd "<leader>oa") 'org-agenda)
(evil-define-key 'normal 'global (kbd "<leader>oc") 'org-capture)) (evil-define-key 'normal 'global (kbd "<leader>oc") 'org-capture)
(evil-define-key 'normal 'org-mode-map (kbd "<leader>or") 'org-refile)
(evil-define-key 'normal 'org-mode-map (kbd "<leader>oAA") 'org-archive-subtree)
(evil-define-key 'normal 'org-mode-map (kbd "<leader>oAT") 'org-toggle-archive-tag))
(use-package evil-collection (use-package evil-collection
:after evil :after evil