From 38f3546fbaa764bce165c0e5c9f94793174ae648 Mon Sep 17 00:00:00 2001 From: Franck Cuny Date: Fri, 12 Feb 2021 11:36:26 -0800 Subject: org: fix some of the capture templates --- emacs/custom/fcuny-org.el | 8 +++++++- 1 file changed, 7 insertions(+), 1 deletion(-) (limited to 'emacs/custom/fcuny-org.el') diff --git a/emacs/custom/fcuny-org.el b/emacs/custom/fcuny-org.el index dded47a..95a77b5 100644 --- a/emacs/custom/fcuny-org.el +++ b/emacs/custom/fcuny-org.el @@ -63,6 +63,8 @@ (org-startup-indented t) + (org-todo-keywords '((type "TODO" "STARTED" "WAITING" "|" "DONE" "CANCELED"))) + ;; priorities (org-priority-start-cycle-with-default nil) ;; Start one over/under default value. (org-highest-priority ?1) @@ -131,7 +133,7 @@ ("Reading" :keys "r" :todo-state "TODO" :headline "Reading" :template ("* %{todo-state} %^{Description}" ":PROPERTIES:" ":CREATED: %U" ":END:" - "%a")) + "%?")) ("Journal" :keys "j" :type entry :datetree t :tree-type week :template ("* %^{Description}" ":PROPERTIES:" ":CREATED: %U" ":END:" @@ -145,6 +147,10 @@ :template ("* %^{Description}" ":PROPERTIES:" ":CREATED: %U" ":END:" "%?")) + ("Reading" :keys "r" :todo-state "TODO" :headline "Reading" + :template ("* %{todo-state} %^{Description}" + ":PROPERTIES:" ":CREATED: %U" ":END:" + "%?")) ("Meeting" :keys "m" :type entry :datetree t :tree-type week :template ("* meeting: %^{Description}" ":PROPERTIES:" ":CREATED: %U" ":END:" -- cgit v1.2.3 From 6d4098efed84da2a27fb1cb838634341b3de054d Mon Sep 17 00:00:00 2001 From: Franck Cuny Date: Fri, 12 Feb 2021 14:52:39 -0800 Subject: org: more updates for captures --- emacs/custom/fcuny-org.el | 40 ++++++++++++++++++++++++++++------------ 1 file changed, 28 insertions(+), 12 deletions(-) (limited to 'emacs/custom/fcuny-org.el') diff --git a/emacs/custom/fcuny-org.el b/emacs/custom/fcuny-org.el index 95a77b5..abf4d2c 100644 --- a/emacs/custom/fcuny-org.el +++ b/emacs/custom/fcuny-org.el @@ -20,9 +20,15 @@ (defvar fcuny/org-personal-notes-file (concat fcuny/org-directory "/personal.org")) +(defvar fcuny/org-personal-journal-file + (concat fcuny/org-directory "/journals/personal.org")) + (defvar fcuny/org-work-notes-file (concat fcuny/org-directory "/twitter.org")) +(defvar fcuny/org-work-journal-file + (concat fcuny/org-directory "/journals/twitter.org")) + (use-package htmlize :ensure t) @@ -75,7 +81,10 @@ (calendar-week-start-day 1) ;; org-mode uses calendar for the date picker, and I want this to start on Monday (org-agenda-start-on-weekday 1) ;; this is specific to org-agenda (org-agenda-files `(,fcuny/org-personal-notes-file - ,fcuny/org-work-notes-file)) + ,fcuny/org-personal-journal-file + ,fcuny/org-work-notes-file + ,fcuny/org-work-journal-file + ,fcuny/org-references-file)) ;; refile (org-refile-use-cache nil) @@ -124,36 +133,43 @@ (("Personal" :keys "p" :file fcuny/org-personal-notes-file :clock-in t :clock-resume t :children (("Task" :keys "t" :todo-state "TODO" :headline "Tasks" :template ("* %{todo-state} [#3] %^{Description}" - ":PROPERTIES:" ":CREATED: %U" ":END:" + ":PROPERTIES:" ":CREATED: %T" ":END:" "%?")) ("Note" :keys "n" :headline "Notes" :type entry :template ("* %^{Description}" - ":PROPERTIES:" ":CREATED: %U" ":END:" + ":PROPERTIES:" ":CREATED: %T" ":END:" "%?")) ("Reading" :keys "r" :todo-state "TODO" :headline "Reading" :template ("* %{todo-state} %^{Description}" - ":PROPERTIES:" ":CREATED: %U" ":END:" + ":PROPERTIES:" ":CREATED: %T" ":END:" "%?")) ("Journal" :keys "j" :type entry :datetree t :tree-type week - :template ("* %^{Description}" - ":PROPERTIES:" ":CREATED: %U" ":END:" + :file fcuny/org-personal-journal-file + :template ("* journal" + ":PROPERTIES:" ":CREATED: %T" ":END:" "%?")))) ("Work" :keys "w" :file fcuny/org-work-notes-file :clock-in t :clock-resume t :children (("Tasks" :keys "t" :todo-state "TODO" :headline "Tasks" :template ("* %{todo-state} [#3] %^{Description}" - ":PROPERTIES:" ":CREATED: %U" ":END:" + ":PROPERTIES:" ":CREATED: %T" ":END:" "%?")) ("Note" :keys "n" :headline "Notes" :type entry :template ("* %^{Description}" - ":PROPERTIES:" ":CREATED: %U" ":END:" + ":PROPERTIES:" ":CREATED: %T" ":END:" "%?")) ("Reading" :keys "r" :todo-state "TODO" :headline "Reading" :template ("* %{todo-state} %^{Description}" - ":PROPERTIES:" ":CREATED: %U" ":END:" + ":PROPERTIES:" ":CREATED: %T" ":END:" + "%?")) + ("Journal" :keys "j" :type entry :datetree t :tree-type month + :file fcuny/org-work-journal-file + :template ("* %U journal" + ":PROPERTIES:" ":CREATED: %T" ":END:" "%?")) - ("Meeting" :keys "m" :type entry :datetree t :tree-type week - :template ("* meeting: %^{Description}" - ":PROPERTIES:" ":CREATED: %U" ":END:" + ("Meeting" :keys "m" :type entry :datetree t :tree-type month + :file fcuny/org-work-journal-file + :template ("* %U meeting: %^{Description}" + ":PROPERTIES:" ":CREATED: %T" ":END:" "%?"))))))))) (provide 'fcuny-org) -- cgit v1.2.3 From 8b7ffe545b1f5621caf48e4e2d85e794a682cb01 Mon Sep 17 00:00:00 2001 From: Franck Cuny Date: Fri, 12 Feb 2021 17:12:49 -0800 Subject: emacs: some updates to org's ui --- emacs/custom/fcuny-org.el | 7 +++++++ 1 file changed, 7 insertions(+) (limited to 'emacs/custom/fcuny-org.el') diff --git a/emacs/custom/fcuny-org.el b/emacs/custom/fcuny-org.el index abf4d2c..d993f0b 100644 --- a/emacs/custom/fcuny-org.el +++ b/emacs/custom/fcuny-org.el @@ -69,7 +69,14 @@ (org-startup-indented t) + (org-ellipsis "↴") + (org-cycle-separator-lines 0) + (org-startup-folded 'content) (org-todo-keywords '((type "TODO" "STARTED" "WAITING" "|" "DONE" "CANCELED"))) + (org-todo-keyword-faces + '(("TODO" . (:foreground "red" :weight bold)) + ("STARTED" . (:foreground "red" :weight bold)) + ("WAITING" . (:foreground "blue" :weight bold)))) ;; priorities (org-priority-start-cycle-with-default nil) ;; Start one over/under default value. -- cgit v1.2.3