From 37945275ac8a491d1c94b8b7d8c63694bf4c80fd Mon Sep 17 00:00:00 2001 From: Franck Cuny Date: Sat, 31 Aug 2024 11:48:17 -0700 Subject: more configuration changes for org-mode --- config/init-notes.el | 34 ++++++++++++++++++++++++++-------- 1 file changed, 26 insertions(+), 8 deletions(-) (limited to 'config/init-notes.el') diff --git a/config/init-notes.el b/config/init-notes.el index 861051d..7e6f5f5 100644 --- a/config/init-notes.el +++ b/config/init-notes.el @@ -21,6 +21,7 @@ (denote-rename-buffer-mode 1) (denote-journal-extras-directory (concat denote-directory "journal/" (format-time-string "%Y"))) (denote-file-type "org") + (denote-org-capture-specifiers "%i\n%?") (denote-dired-directories (list denote-directory)) (denote-dired-directories-include-subdirectories t) (denote-journal-extras-title-format 'day-date-month-year)) @@ -30,10 +31,12 @@ (org-mode . turn-on-flyspell) (org-mode . visual-line-mode) (org-mode . org-indent-mode) + :custom (org-directory "~/Documents/notes") - (org-default-notes-file (expand-file-name "inbox.org" org-directory)) - + (org-default-notes-file (expand-file-name "tasks.org" org-directory)) + (org-agenda-files '("tasks.org")) + (org-startup-folded t) (org-startup-indented t) (org-startup-with-inline-images t) @@ -52,8 +55,7 @@ ;; org-refile options (org-refile-allow-creating-parent-nodes (quote confirm)) - (org-refile-use-outline-path 'file - org-outline-path-complete-in-steps nil) + (org-refile-targets '(("tasks.org" :maxlevel . 2))) (org-hide-emphasis-markers t) (org-hide-leading-stars t) @@ -84,10 +86,26 @@ ("q" . "quote") ("V" . "verbatim")))) -(use-package org-bullets - :ensure t - :hook (org-mode . org-bullets-mode)) - +(use-package org-capture + :ensure nil + :after org + :bind + ("C-c c" . org-capture) + :config + (setq org-capture-templates + `(("t" "Tasks" entry (file+olp "tasks.org" "Inbox") + "* TODO %?\n%U" :prepend t :empty-lines 0) + ("n" "note" plain (file denote-last-path) #'denote-org-capture + :no-save t :immediate-finish nil :kill-buffer t :jump-to-captured nil)))) + +(use-package org-agenda + :ensure nil + :after org + :bind + ("C-c a" . org-agenda) + :custom + (org-agenda-start-on-weekday 1)) + (use-package org-auto-tangle :ensure t :hook (org-mode . org-auto-tangle-mode)) -- cgit 1.4.1