From f22bfd82893a0d20aa729008b15866e8ae5706cc Mon Sep 17 00:00:00 2001
From: Vedang Manerikar <ved.manerikar@gmail.com>
Date: Sun, 1 Dec 2024 17:30:47 +0530
Subject: [PATCH] Export capture templates to the org-mode config file
---
unravel-modules/unravel-org.el | 315 ++++++++++++++++++++++++++++++++-
1 file changed, 314 insertions(+), 1 deletion(-)
diff --git a/unravel-modules/unravel-org.el b/unravel-modules/unravel-org.el
index 85bf28f..b923cc2 100644
--- a/unravel-modules/unravel-org.el
+++ b/unravel-modules/unravel-org.el
@@ -379,7 +379,7 @@ Skips capture tasks and tasks with subtasks"
(setq org-agenda-menu-two-columns nil)
;; Don't recalculate agenda unless I explicitly say so.
(setq org-agenda-sticky t)
- (setq org-agenda-custom-commands-contexts nil)
+ (setq org-agenda-custom-commands-contexts nil)
(setq org-agenda-max-entries nil)
(setq org-agenda-max-todos nil)
(setq org-agenda-max-tags nil)
@@ -581,4 +581,317 @@ Skips capture tasks and tasks with subtasks"
(setq org-habit-preceding-days 9)
(setq org-habit-show-all-today t))
+;;;; org-capture
+(use-package org-capture
+ :ensure nil
+ :config
+;;; Default definitions for variables used in capture templates
+ (when (not (boundp 'org-blogpost-file))
+ (defvar org-blogpost-file org-default-notes-file
+ "File in which blogposts and microblogposts are stored."))
+ (when (not (boundp 'org-company-file))
+ (defvar org-company-file org-default-notes-file
+ "File in which company documentation is stored."))
+
+;;; *CRITICAL NOTE* Read before modifying the push stack below:
+ ;; Pushing to capture templates is a stack. What goes in first shows
+ ;; up at the bottom of the capture templates list.
+
+;;; Templates for thinking tools
+ (push '("T" "Templates for Helping Me Think") org-capture-templates)
+ ;; Capture a decision that you've taken, for review and reflection later.
+ (push `("Td" "Decision Journal" entry
+ (file+headline org-default-notes-file "Helping Me Think")
+ (file ,(expand-file-name "capture-templates/thinking.decision.org"))
+ :prepend nil
+ :clock-in t
+ :clock-resume t
+ :empty-lines 1)
+ org-capture-templates)
+
+ ;; Create a Current Reality Tree for a problem
+ (push `("Tc" "Current Reality Tree" entry
+ (file+headline org-default-notes-file "Helping Me Think")
+ (file ,(expand-file-name "capture-templates/thinking.crt.org"))
+ :prepend nil
+ :clock-in t
+ :clock-resume t
+ :empty-lines 1)
+ org-capture-templates)
+
+ ;; Create an Evaporating Cloud for a problem
+ (push `("Te" "Evaporating Cloud" entry
+ (file+headline org-default-notes-file "Helping Me Think")
+ (file ,(expand-file-name "capture-templates/thinking.ec.org"))
+ :prepend nil
+ :clock-in t
+ :clock-resume t
+ :empty-lines 1)
+ org-capture-templates)
+
+ ;; Create a Future Reality Tree for a problem
+ (push `("Tf" "Future Reality Tree" entry
+ (file+headline org-default-notes-file "Helping Me Think")
+ (file ,(expand-file-name "capture-templates/thinking.frt.org"))
+ :prepend nil
+ :clock-in t
+ :clock-resume t
+ :empty-lines 1)
+ org-capture-templates)
+
+ ;; Create a Prerequisite Tree for a problem
+ (push `("Tp" "Prerequisite Tree" entry
+ (file+headline org-default-notes-file "Helping Me Think")
+ (file ,(expand-file-name "capture-templates/thinking.prt.org"))
+ :prepend nil
+ :clock-in t
+ :clock-resume t
+ :empty-lines 1)
+ org-capture-templates)
+
+ ;; Create a Transition Tree for a problem
+ (push `("Tt" "Transition Tree" entry
+ (file+headline org-default-notes-file "Helping Me Think")
+ (file ,(expand-file-name "capture-templates/thinking.trt.org"))
+ :prepend nil
+ :clock-in t
+ :clock-resume t
+ :empty-lines 1)
+ org-capture-templates)
+
+ ;; Capture a new Business idea for sketching out / thinking through
+ (push `("Tb" "Business Canvas" entry
+ (file+headline org-default-notes-file "Helping Me Think")
+ (file ,(expand-file-name "capture-templates/business.canvas.org"))
+ :prepend nil
+ :clock-in t
+ :clock-resume t
+ :empty-lines 1)
+ org-capture-templates)
+
+ ;; Capture a customer persona, note that this is always captured in
+ ;; the current clocking task, and is something I should do under the
+ ;; business canvas.
+ (push `("TP" "Customer Persona (under Business Canvas)" entry
+ (clock)
+ (file ,(expand-file-name "capture-templates/business.customer.persona.org"))
+ :prepend nil
+ :clock-in t
+ :clock-resume t
+ :empty-lines 1)
+ org-capture-templates)
+
+ ;; Capture a customer journey through your product, note that this is
+ ;; always captured in the current clocking task
+ (push `("Tj" "Customer Journey (under Business Canvas)" entry
+ (clock)
+ (file ,(expand-file-name "capture-templates/business.customer.journey.org"))
+ :prepend nil
+ :clock-in t
+ :clock-resume t
+ :empty-lines 1)
+ org-capture-templates)
+
+;;; Templates for capturing data about myself on a day-to-day basis
+ (push '("d" "Templates for Capturing Data (personal)") org-capture-templates)
+
+ ;; Capture weight / food. This seems hard to get into a laptop habit.
+ ;; This is the kind of quantitative life that a mobile solution would
+ ;; have helped with.
+
+ (push `("dw" "Weight Tracking" entry
+ (file+olp+datetree org-default-notes-file)
+ (file ,(expand-file-name "capture-templates/bodylog.weight.org"))
+ :clock-in t
+ :clock-resume t
+ :immediate-finish t
+ :empty-lines 1)
+ org-capture-templates)
+
+ (push `("df" "Food Tracking" entry
+ (file+olp+datetree org-default-notes-file)
+ (file ,(expand-file-name "capture-templates/bodylog.food.org"))
+ :clock-in t
+ :clock-resume t
+ :immediate-finish t
+ :empty-lines 1)
+ org-capture-templates)
+
+ (push `("dd" "Downtime Tracking" entry
+ (file+olp+datetree org-default-notes-file)
+ (file ,(expand-file-name "capture-templates/bodylog.dt.org"))
+ :clock-in t
+ :clock-resume t
+ :immediate-finish t
+ :empty-lines 1)
+ org-capture-templates)
+
+;;; Templates for capturing build in public ideas
+ (push '("b" "Templates for Capturing Build in Public") org-capture-templates)
+
+ ;; Capture Micro-blogging
+ (push `("bm" "New Microblogging entry" entry
+ (file+olp+datetree org-blogpost-file "Microblogging")
+ (file ,(expand-file-name "capture-templates/microblog.org"))
+ :prepend nil
+ :clock-in t
+ :clock-resume t
+ :empty-lines 1)
+ org-capture-templates)
+
+ ;; New blogpost idea
+ (push `("bb" "New Blogpost entry" entry
+ (file+headline org-blogpost-file "Meta: Blogposts to write")
+ (file ,(expand-file-name "capture-templates/todo.org"))
+ :prepend nil
+ :clock-in t
+ :clock-resume t
+ :empty-lines 1)
+ org-capture-templates)
+
+;;; Templates for when I want to capture specific feedback about something
+ (push '("f" "Templates for Feedback, Reflection, Journaling") org-capture-templates)
+
+ ;; Capture feedback for people I am working with
+ (push `("fp" "Feedback for People I'm working with" item
+ (file+headline org-company-file "Feedback")
+ (file ,(expand-file-name "capture-templates/feedback.others.org"))
+ :clock-in t
+ :clock-resume t
+ :empty-lines 1)
+ org-capture-templates)
+
+ ;; The monthly newsletter to send to investors, friends and mentors
+ (push `("fn" "Company Newsletters" entry
+ (file+headline org-company-file "Company Newsletters")
+ (file ,(expand-file-name "capture-templates/business.updates.org"))
+ :prepend nil
+ :clock-in t
+ :clock-resume t
+ :empty-lines 1)
+ org-capture-templates)
+
+ ;; Capture suggestions / ideas from other people, which can be
+ ;; expanded into actual projects later.
+ (push `("fs" "Ideas and Suggestions" entry
+ (file+headline org-company-file "Ideas and Suggestions")
+ (file ,(expand-file-name "capture-templates/suggestion.org"))
+ :prepend t
+ :clock-in t
+ :clock-resume t
+ :empty-lines 1)
+ org-capture-templates)
+
+;;; Templates for planning on a day-to-day basis
+ (push '("p" "Templates for Planning") org-capture-templates)
+
+ ;; Deliberately plan out and make a routine out of start of day and
+ ;; end of day activities.
+
+ (push `("ps" "The Start of Day Planning Routine" entry
+ (file+olp+datetree org-default-notes-file)
+ (file ,(expand-file-name "capture-templates/workday.start.org"))
+ :prepend nil
+ :clock-in t
+ :clock-resume t
+ :empty-lines 1)
+ org-capture-templates)
+
+ (push `("pe" "The End of Day Reflection Routine" entry
+ (file+olp+datetree org-default-notes-file)
+ (file ,(expand-file-name "capture-templates/workday.end.org"))
+ :prepend nil
+ :clock-in t
+ :clock-resume t
+ :empty-lines 1)
+ org-capture-templates)
+
+ (push `("pn" "The Next Day Intentions Routine" entry
+ (file+olp+datetree org-default-notes-file)
+ (file ,(expand-file-name "capture-templates/workday.next.org"))
+ :prepend nil
+ :clock-in t
+ :clock-resume t
+ :empty-lines 1)
+ org-capture-templates)
+
+;;; Templates for capturing meetings, events, something happening at this time
+ (push '("m" "Templates for Capturing Meetings or Events") org-capture-templates)
+
+ ;; Capture an upcoming meeting or one that has already happened
+ (push `("mp" "Meeting some other day" entry
+ (file+olp+datetree org-default-notes-file)
+ (file ,(expand-file-name "capture-templates/meeting.org"))
+ :prepend t
+ :clock-in t
+ :clock-resume t
+ :time-prompt t)
+ org-capture-templates)
+
+ ;; Capture notes for an ongoing meeting or a meeting that's already
+ ;; happened.
+ (push `("mn" "Meeting today" entry
+ (file+olp+datetree org-default-notes-file)
+ (file ,(expand-file-name "capture-templates/meeting.org"))
+ :prepend t
+ :clock-in t
+ :clock-resume t)
+ org-capture-templates)
+
+;;; Templates for Capturing Tasks
+ (push '("t" "Templates for Capturing Tasks") org-capture-templates)
+
+ ;; Set up a new habit for tracking. This should be refiled to the
+ ;; correct location later.
+ (push `("th" "Habit" entry
+ (file+headline org-default-notes-file "My Habit Tracker")
+ (file ,(expand-file-name "capture-templates/habit.org")))
+ org-capture-templates)
+
+ ;; One-click Capture for replying to emails from notmuch. Creates a
+ ;; task to remind you that you need to reply to this email.
+ (push `("tr" "Respond to email" entry
+ (file+olp+datetree org-default-notes-file)
+ (file ,(expand-file-name "capture-templates/reply.org"))
+ :clock-in t
+ :clock-resume t
+ :immediate-finish t)
+ org-capture-templates)
+
+ ;; One-click capture of links from the clipboard. Used in conjunction
+ ;; with `org-protocol', or as a stand-alone to capture links.
+ (push `("tw" "Website Link Immediate Capture" entry
+ (file+olp org-default-notes-file "Links Captured from the Browser")
+ (file ,(expand-file-name "capture-templates/website.org"))
+ :immediate-finish t)
+ org-capture-templates)
+
+ ;; A more nuanced capture for browser links, which I use for cleaning
+ ;; out my browser 2/3 times a week.
+ (push `("tl" "Website Link Pinboard Capture" entry
+ (file+olp org-default-notes-file "Links Captured from the Browser")
+ (file ,(expand-file-name "capture-templates/pinboard.capture.org"))
+ :clock-in t
+ :clock-resume t
+ :immediate-finish t)
+ org-capture-templates)
+
+ ;; Capture a task where someone expects me to communicate when it's done
+ (push `("tj" "Jira or External-facing Task" entry
+ (file+olp+datetree org-default-notes-file)
+ (file ,(expand-file-name "capture-templates/jira.org"))
+ :clock-in t
+ :clock-resume t)
+ org-capture-templates)
+
+ ;; One-click Capture for Tasks. Captures the task immediately and gets
+ ;; out of your way.
+ (push `("ti" "Simple Task Immediate Finish" entry
+ (file+olp+datetree org-default-notes-file)
+ (file ,(expand-file-name "capture-templates/todo.org"))
+ :clock-in t
+ :clock-resume t
+ :immediate-finish t)
+ org-capture-templates))
+
(provide 'unravel-org)