mmk2410
/
dotfiles
1
0
Fork 0
Code Issues Pull Requests Releases Wiki Activity

Emacs: huge improvments in org-mode configuration

This commit is contained in:
Marcel Kapfer 2018-10-17 20:17:05 +02:00
parent ffe2d83f57
commit 9ffd29dacb
Signed by: mmk2410
GPG Key ID: CADE6F0C09F21B09
1 changed files with 21 additions and 17 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

38
emacs/emacs.el
View File

@ -451,18 +451,21 @@
;; bind capture templates ;; bind capture templates
(setq org-capture-templates (setq org-capture-templates
'(("t" "todo" entry (file+headline "~/cloud/org/todo.org" "Tasks") '(("t" "todo" entry (file+headline "~/cloud/org/todo.org" "Tasks")
"* TODO [#A] %? \n %u") "* TODO [#A] %? %^G\n %u")
("s" "scheduled todo" entry (file+headline "~/cloud/org/todo.org" "Tasks") ("s" "scheduled todo" entry (file+headline "~/cloud/org/todo.org" "Tasks")
"* TODO [#A] %? \n SCHEDULED: %(org-insert-time-stamp (org-read-date nil t \"+0d\"))\n %u\n") "* TODO [#A] %? %^G\n SCHEDULED: %^T\n %u\n")
("m" "scheduled mail" entry (file+headline "~/cloud/org/todo.org" "Tasks") ("m" "scheduled mail" entry (file+headline "~/cloud/org/todo.org" "Tasks")
"* TODO [#A] %? \n SCHEDULED: %(org-insert-time-stamp (org-read-date nil t \"+0d\"))\n %u\n %a\n") "* TODO [#A] %? %^G\n SCHEDULED: %^T\n %u\n %a\n")
("n" "Note" entry (file+headline "~/cloud/org/notes.org" "Notes") ("n" "Note" entry (file+headline "~/cloud/org/notes.org" "Notes")
"* %? \n %i\n %u\n %a\n") "* %? \n %i\n %u\n %a\n")
("p" "Project Idea" entry (file+headline "~/cloud/org/projects.org" "INBOX") ("p" "Project Idea" entry (file+headline "~/cloud/org/projects.org" "INBOX")
"* %? \n %i\n %u\n %a\n") "* %? %^G\n %i\n %u\n")
("w" "Wiki Entry" entry (file+headline "~/cloud/org/wiki.org" "INBOX") ("w" "Wiki Entry" entry (file+headline "~/cloud/org/wiki.org" "INBOX")
"* %? \n %u\n %i\n"))) "* %? \n %u\n %i\n")))
;; set org refile targets
(setq org-refile-targets '(("~/cloud/org/projects.org" :maxlevel 3)))
;; warn of deadlines in the next seven days ;; warn of deadlines in the next seven days
(setq org-deadline-warning-days 7) (setq org-deadline-warning-days 7)
@ -498,19 +501,20 @@
(use-package org-super-agenda (use-package org-super-agenda
:after org :after org
:init (org-super-agenda-mode 1) :init (org-super-agenda-mode 1)
:config (let ((org-super-agenda-groups :config (setq org-super-agenda-groups
'( '(
(:name "Today" (:name "Today"
:time-grid t :time-grid t
:scheduled today) :scheduled today)
(:name "Important from the past" (:name "Important from the past"
:and (:priority "A" :scheduled past)) :and (:priority "A" :scheduled past))
(:name "Important" (:name "Waiting..."
:and (:priority "A" :scheduled futu)) :todo "WAIT")
(:name "Scheduled earlier" (:name "Scheduled earlier"
:scheduled past) :scheduled past)
(:priority<= "B")))) (:name "Not scheduled"
(org-agenda-list))) :scheduled nil)
(:priority<= "B"))))
;; fill-column-indicator ;; fill-column-indicator
;; Graphically indicate the fill column ;; Graphically indicate the fill column