From 388f6673eb6bd3a7fd96d6b6cb15d163a3bf7711 Mon Sep 17 00:00:00 2001 From: Kat Huang Date: Sun, 20 Aug 2023 21:47:42 +0000 Subject: [PATCH] [Emacs] Tweaks for kat, including setting default initial TODO state --- dotfiles/emacs.d/README.org | 17 +++++++++-------- 1 file changed, 9 insertions(+), 8 deletions(-) diff --git a/dotfiles/emacs.d/README.org b/dotfiles/emacs.d/README.org index 6f7552bb..83de601f 100644 --- a/dotfiles/emacs.d/README.org +++ b/dotfiles/emacs.d/README.org @@ -3017,6 +3017,7 @@ The following is taken from [[https://github.com/syl20bnr/spacemacs/blob/a650877 (defvar imalison:org-dir "~/org") (defvar imalison:shared-org-dir "~/katnivan") (defvar imalison:org-whoami nil) +(defvar imalison:org-default-initial-state "TODO") (use-package org :commands (org-mode org org-mobile-push org-mobile-pull org-agenda) :mode ("\\.org\\'" . org-mode) @@ -3038,7 +3039,7 @@ The following is taken from [[https://github.com/syl20bnr/spacemacs/blob/a650877 (org-fold-catch-invisible-edits 'show) (org-edit-src-content-indentation 0) (org-src-preserve-indentation t) - (org-refile-targets '((org-agenda-files . (:maxlevel . 1)) + (org-refile-targets '((org-agenda-files . (:maxlevel . 2)) (org-agenda-files . (:level . 0)))) (org-refile-use-outline-path 'file) (org-log-into-drawer t) @@ -3052,7 +3053,8 @@ The following is taken from [[https://github.com/syl20bnr/spacemacs/blob/a650877 (org-agenda-skip-scheduled-if-done t) (org-agenda-skip-deadline-if-done t) (org-agenda-window-setup 'other-window) - (org-imenu-depth 10)) + (org-imenu-depth 10) + (org-agenda-timegrid-use-ampm 1)) :preface (progn (require 'cl-lib) @@ -3062,7 +3064,7 @@ The following is taken from [[https://github.com/syl20bnr/spacemacs/blob/a650877 arg)) (defun imalison:set-display-custom-times () - (setq org-display-custom-times t)) + (setq org-display-custom-times nil)) (setq org-goto-interface 'outline-path-completion org-goto-max-level 10 @@ -3122,7 +3124,7 @@ The following is taken from [[https://github.com/syl20bnr/spacemacs/blob/a650877 (imalison:make-org-template (imalison:get-string-from-file filename))) (cl-defun imalison:make-org-todo-template - (&key (content "%?") (creation-state "TODO")) + (&key (content "%?") (creation-state imalison:org-default-initial-state)) (with-temp-buffer (org-mode) (org-insert-heading) @@ -3187,9 +3189,9 @@ The following is taken from [[https://github.com/syl20bnr/spacemacs/blob/a650877 ("STYLE_ALL" . "habit")))) ;; Record changes to todo states (setq org-todo-keywords - '((sequence "IDEA(i!)" "RESEARCH(r!)" "TODO(t!)" "NEXT(n!)" - "STARTED(s!)" "WAIT(w!)" "BACKLOG(b!)" "|" - "DONE(d!)" "HANDLED(h!)" "EXPIRED(e!)" "CANCELED(c!)"))) + '((sequence "INBOX(i!)" "TODO(t!)" "NEXT(n!)" "STARTED(s!)" "WAIT(w!)" + "BACKLOG(b!)" "|" "DONE(d!)" "HANDLED(h!)" "EXPIRED(e!)" + "CANCELED(c!)"))) (setq org-todo-repeat-to-state "TODO") @@ -3313,7 +3315,6 @@ The following is taken from [[https://github.com/syl20bnr/spacemacs/blob/a650877 :disabled t :config (progn - (setq org-ehtml-docroot (expand-file-name "~/Dropbox/org")) (setq org-ehtml-allow-agenda t) (setq org-ehtml-editable-headlines t) (setq org-ehtml-everything-editable t)))