james/dotfiles
1
0
Fork 0
Code Issues 7 Pull Requests Releases Activity

Add work capture.

Browse Source
This commit is contained in:
James Patrick 2021-09-13 20:10:46 -04:00
parent 11e3f15472
commit 5799cbb1b4
1 changed files with 26 additions and 14 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

40
emacs/+org.el
View File

@ -2,14 +2,26 @@
(require 'org) (require 'org)
(custom-set-variables '(org-directory "~/org/")) (custom-set-variables '(org-directory "~/org/"))
(defvar +org-capture-work-todo-file "work/todo.org"
"location for my work todo list.
This is defined relative to the `org-directory' unless absolute.")
(defun +org-capture-work-todo-file ()
"Expand `+org-capture-work-todo-file' from `org-directory'.
If it is an absolute path return `+org-capture-work-todo-file' verbatim."
(expand-file-name +org-capture-work-todo-file org-directory))
(setq (setq
deft-directory org-directory deft-directory org-directory
org-download-image-dir (concat org-directory "resources") org-download-image-dir (concat org-directory "resources")
org-roam-directory org-directory) org-roam-directory org-directory)
(setq org-agenda-files (list (setq org-agenda-files (list
(concat org-directory "work/todo.org") (concat org-directory +org-capture-work-todo-file )
(concat org-directory "todo.org") ;;(concat org-directory "todo.org")
) )
) )
;(org-agenda-files (file-expand-wildcards (concat org-directory "*". )"~/ref/*.org") ;(org-agenda-files (file-expand-wildcards (concat org-directory "*". )"~/ref/*.org")
@ -65,21 +77,11 @@
(0.5 . org-upcoming-deadline) (0.5 . org-upcoming-deadline)
(0.0 . org-upcoming-distant-deadline))) (0.0 . org-upcoming-distant-deadline)))
;; Use appear to make org syntax easier to not fuck up.
;(use-package! org-appear
; :hook (org-mode . org-appear-mode)
; :config
; (setq org-appear-autoemphasis t
; org-appear-autosubmarkers t
; org-appear-autolinks nil)
; ;; for proper first-time setup, `org-appear--set-elements'
; ;; needs to be run after other hooks have acted.
; (run-at-time nil nil #'org-appear--set-elements))
;; Added Org-mode ;; Added Org-mode
(add-hook 'org-mode-hook (lambda () (add-hook 'org-mode-hook (lambda ()
"Beautify Org Checkbox Symbol" "Beautify Org Checkbox Symbol"`
(push '("[ ]" . "☐") prettify-symbols-alist) (push '("[ ]" . "☐") prettify-symbols-alist)
(push '("[_]" . "☐") prettify-symbols-alist)
(push '("[X]" . "☑" ) prettify-symbols-alist) (push '("[X]" . "☑" ) prettify-symbols-alist)
(push '("[-]" . "⊟" ) prettify-symbols-alist) (push '("[-]" . "⊟" ) prettify-symbols-alist)
(prettify-symbols-mode))) (prettify-symbols-mode)))
@ -98,3 +100,13 @@
org-agenda-block-separator nil org-agenda-block-separator nil
org-agenda-tags-column 100 ;; from testing this seems to be a good value org-agenda-tags-column 100 ;; from testing this seems to be a good value
org-agenda-compact-blocks t) org-agenda-compact-blocks t)
(add-to-list 'org-capture-templates
'("w" "Work Todo" entry
(file+headline +org-capture-work-todo-file "Inbox")
"* [_] %?\n%i\n%a" :prepend t))
(setq org-roam-directory "~/org/roam")
(load! "org/+babel-diff")