Skip to content

Instantly share code, notes, and snippets.

View jwiegley's full-sized avatar

John Wiegley jwiegley

View GitHub Profile
(defun org-config-show-filetagged-tasks (tag)
"Report items pending review after one second."
(interactive "sTag: ")
(org-ql-search (org-agenda-files)
'(and (todo)
(save-excursion
(goto-char (point-min))
(re-search-forward (concat "#\\+filetags:.*:" tag ":") nil t)))
:sort '(scheduled)))
(length
(org-ql-query
:select '(point)
:from (org-agenda-files)
:where
'(and (todo)
(not (or (ancestors (todo))
(scheduled)
(deadline)
(ts-active)))
TodoITEM_BY_IDLAST_REVIEWNEXT_REVIEWTags
(defun org-extra-get-properties (&rest props)
(cons (org-current-level)
(mapcar #'(lambda (prop)
(if (string= "ITEM_BY_ID" prop)
(format "[[id:%s][%s]]"
(org-entry-get (point) "ID")
(org-entry-get (point) "ITEM"))
(org-entry-get (point) prop)))
props)))
(defvar org-refile-context-file nil)
(defvar org-refile-context-olp nil)
(defun org-refile-context-record (&rest _)
(setq org-refile-context-file
(file-relative-name (buffer-file-name))
org-refile-context-olp
(org-format-outline-path (org-get-outline-path))))
(defun org-refile-context-insert ()
Debugger entered--Lisp error: (wrong-type-argument stringp nil)
org-element--headline-deferred((headline ...))
apply(org-element--headline-deferred (headline ...) nil)
org-element--property(:deferred (headline ...) nil force-undefer)
org-element--property(:ID (headline ...) nil nil)
#<subr org-element--cache-verify-element>((headline ...))
apply(#<subr org-element--cache-verify-element> (headline ...))
org-element--cache-verify-element((headline ...))
org-element-at-point(nil cached)
org-before-first-heading-p()

HABIT ✶ Vacuum pool

PARA and the value of meaningful distinctions

There have been many trends in the data and task management world, from day planners, to GTD, to bullet journals, to the PARA method – and many more. This article takes a look at PARA in particular, but also pulls back a bit as to why these various systems keep popping up, what values they offer, and why we will keep seeing new such systems for a long time to come.

The starting point is the same for everyone: We have a sea of knowledge that we want to – or have to – work with, that quickly exceeds the capacities of

Debugger entered--Lisp error: (wrong-type-argument stringp nil)
set-buffer(nil)
(save-current-buffer (set-buffer (let ((idx (or 14 14))) (let* ((parray (and t (and idx ...)))) (if parray (let* ((val ...)) (if (eq val ...) 'nil (let ... val))) (let* ((val ...)) (cond (... ...) (... ...) (t ...))))))) (save-excursion (save-restriction (widen) (let* ((value (let (... ...) (if contents-begin ...)))) (if (eq (org-element-type element t) 'plain-text) (org-add-props element nil :robust-begin value) (let ((parray ...)) (if parray (progn ...)) element))) (let* ((value (let (... ...) (if contents-end ...)))) (if (eq (org-element-type element t) 'plain-text) (org-add-props element nil :robust-end value) (let ((parray ...)) (if parray (progn ...)) element))) (if (let ((idx (or 12 12))) (let* ((parray ...)) (if parray (let* ... ...) (let* ... ...)))) nil (if (eq (org-element-type element t) 'plain-text) (org-add-props element nil :robust-begin nil) (let ((parray ...)) (if parray (progn ...)) element))) (goto-char (org