12345678910111213141516171819202122232425262728293031323334353637383940414243444546474849505152535455565758596061626364656667686970717273747576777879808182838485868788899091929394 |
- ;; dkellner-org.el --- my life in plain text
- ;;
- ;; See http://orgmode.org/ .
- ;; Global keybindings to quickly view my agenda and capture thoughts.
- (bind-key "C-c a" #'org-agenda)
- (bind-key "C-c c" #'org-capture)
- (bind-key "C-c l" #'org-store-link)
- ;; Basic configuration: set main org files for agenda/capturing and
- ;; TODO-keywords.
- (setq org-directory "~/org/")
- (setq org-agenda-files '("~/org/main.org" "~/org/pap.org" "~/org/tickler.org"))
- (setq org-refile-targets '(("main.org" :maxlevel . 2)
- ("pap.org" :maxlevel . 1)
- ("tickler.org" :maxlevel . 1)
- ("bookmarks.org" :maxlevel . 1)
- ("someday.org" :level . 1)))
- (setq org-todo-keywords '((sequence "TODO(t)" "NEXT(n)" "WAITING(w)" "|"
- "DONE(d)")))
- ;; This list contains tags I want to use in almost any file as they are tied to
- ;; actionable items (e.g. GTD contexts).
- (setq org-tag-alist `((:startgroup)
- ("@laptop" . ,(string-to-char "l"))
- ("@phone" . ,(string-to-char "p"))
- ("@home" . ,(string-to-char "h"))
- ("@errands" . ,(string-to-char "e"))
- (:endgroup)))
- (setq org-startup-folded t)
- (setq org-log-into-drawer t)
- (setq org-agenda-todo-ignore-scheduled 'all)
- (setq org-agenda-todo-ignore-deadlines 'all)
- (setq org-agenda-tags-todo-honor-ignore-options t)
- (setq org-agenda-restore-windows-after-quit t)
- (setq org-time-clocksum-format "%d:%02d")
- (setq org-enforce-todo-dependencies t)
- (setq org-columns-default-format
- "%40ITEM(Task) %3Priority(Pr.) %16Effort(Estimated Effort){:} %CLOCKSUM{:}")
- (setq org-export-with-sub-superscripts nil)
- (setq org-export-allow-bind-keywords t)
- (setq org-default-priority ?C)
- ;; I mostly use the capture template for "Inbox" to put new ideas, todos etc.
- ;; in my `main.org' file for later processing (GTD-style).
- (setq org-capture-templates
- '(("i" "Inbox" entry (file "~/org/inbox.org")
- "* %?")
- ("I" "Inbox (with link)" entry (file "~/org/inbox.org")
- "* %?\n %a")
- ("j" "Journal" entry (file+datetree "~/org/journal.org")
- "* %?" :kill-buffer t)))
- ;; Enable habit tracking. For more information see
- ;; http://orgmode.org/org.html#Tracking-your-habits .
- (require 'org-habit)
- (require 'org-drill)
- (require 'org-notmuch)
- (setq org-agenda-custom-commands
- '(("d" "Daily agenda"
- ((agenda "" ((org-agenda-span 'day)))
- (tags-todo "-PRIORITY=\"C\""
- ((org-agenda-sorting-strategy
- '(tag-up priority-down))))))))
- ;; Enable more languages for Babel, especially useful for
- ;; "Literate Devops", see https://www.youtube.com/watch?v=dljNabciEGg .
- (org-babel-do-load-languages 'org-babel-load-languages '((emacs-lisp . t)
- (python . t)
- (shell . t)
- (dot . t)))
- ;; Eye candy!
- (setq org-hide-leading-stars t)
- ;; Simple presentations inside Emacs.
- (use-package org-tree-slide)
- (add-hook 'org-mode-hook (lambda () (auto-fill-mode 1)))
- (use-package org-pomodoro
- :bind ("C-c P" . org-pomodoro)
- :config
- (setq org-pomodoro-format "● %s"
- org-pomodoro-short-break-format "◔ %s"
- org-pomodoro-long-break-format "◕ %s"
- org-pomodoro-audio-player "aplay"))
- (provide 'dkellner-org)
|