-
Notifications
You must be signed in to change notification settings - Fork 1
/
rgr-org.el
103 lines (96 loc) · 4.08 KB
/
rgr-org.el
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
(use-package org
:demand t
;;:straight (:type built-in)
:custom
(org-agenda-files (no-littering-expand-etc-file-name "org/agenda-files.txt"))
(org-fontify-done-headline t)
(org-fontify-todo-headline t)
(org-clock-idle-time 10)
(org-babel-default-header-args:python
'((:results . "output")))
(org-refile-use-outline-path 'file)
(org-outline-path-complete-in-steps nil)
:config
(set-face-attribute 'org-headline-done nil :strike-through t)
(defun rgr/org-agenda (&optional arg)
(interactive "P")
(let ((org-agenda-tag-filter-preset '("-trash")))
(org-agenda arg "a")))
:bind
("C-c a" . org-agenda)
("C-c A" . rgr/org-agenda)
("C-c c" . org-capture)
("C-c l" . org-store-link)
("C-c C-l" . org-insert-link)
("C-c C-s" . org-schedule)
("C-c C-t" . org-todo)
("C-c C-x C-j" . org-clock-goto)
(:map org-mode-map
("M-." . find-function-at-point)))
(use-package org-contrib)
(require 'org-id)
(require 'org-crypt)
(org-crypt-use-before-save-magic)
(use-package ob-async)
(use-package org-super-agenda
:custom
(org-super-agenda-groups
'(;; Each group has an implicit boolean OR operator between its selectors.
(:name "Today" ; Optionally specify section name
:time-grid t ; Items that appear on the time grid
:todo "TODAY") ; Items that have this TODO keyword
(:name "Important"
;; Single arguments given alone
:tag "bills"
:priority "A")
;; Set order of multiple groups at once
(:order-multi (2 (:name "home"
;; Boolean AND group matches items that match all subgroups
:and (:tag "@home"))
(:name "caravan"
;; Boolean AND group matches items that match all subgroups
:and (:tag "@caravan"))
(:name "shopping all"
;; Boolean AND group matches items that match all subgroups
:and (:tag "shopping" :not (:tag "@home @caravan")))
(:name "shopping"
;; Boolean AND group matches items that match all subgroups
:and (:tag "shopping" :not (:tag "@home @caravan")))
(:name "Emacs related"
;; Boolean AND group matches items that match all subgroups
:tag ("emacs"))
(:name "Linux related"
:and (:tag ("linux") :not (:tag "emacs")))
(:name "Programming related"
:and (:tag ("programming") :not (:tag "emacs")))
(:name "Food-related"
;; Multiple args given in list with implicit OR
:tag ("food" "dinner" "lunch" "breakfast"))
(:name "Personal"
:habit t
:tag "personal")
))
;; Groups supply their own section names when none are given
(:todo "WAITING" :order 8) ; Set order of this section
(:todo "STARTED" :order 8)
(:todo ("SOMEDAY" "TOREAD" "CHECK" "TO-WATCH" "WATCHING")
;; Show this group at the end of the agenda (since it has the
;; highest number). If you specified this group last, items
;; with these todo keywords that e.g. have priority A would be
;; displayed in that group instead, because items are grouped
;; out in the order the groups are listed.
:order 9)
(:priority<= "B"
;; Show this section after "Today" and "Important", because
;; their order is unspecified, defaulting to 0. Sections
;; are displayed lowest-number-first.
:order 1)
;; After the last group, the agenda will display items that didn't
;; match any of these groups, with the default order position of 99
))
:init
(org-super-agenda-mode))
(use-package
ox-gfm
:demand)
(provide 'rgr/org)