Split large setq init block for Org Mode into smaller parts
This makes it easier to evaluate assignments individually.
This commit is contained in:
parent
bea691cc9b
commit
4dbc4b14c6
36
init.el
36
init.el
|
@ -716,7 +716,8 @@ With given ARG, display files in `db/important-document-path’."
|
||||||
:commands (org-store-link)
|
:commands (org-store-link)
|
||||||
:bind (:map org-mode-map
|
:bind (:map org-mode-map
|
||||||
([remap org-return] . org-return-indent))
|
([remap org-return] . org-return-indent))
|
||||||
:init (setq org-deadline-warning-days 14
|
:init (progn
|
||||||
|
(setq org-deadline-warning-days 14
|
||||||
org-read-date-popup-calendar t
|
org-read-date-popup-calendar t
|
||||||
org-insert-heading-respect-content t
|
org-insert-heading-respect-content t
|
||||||
org-list-description-max-indent 5
|
org-list-description-max-indent 5
|
||||||
|
@ -743,7 +744,17 @@ With given ARG, display files in `db/important-document-path’."
|
||||||
|
|
||||||
org-duration-format '(("y") ("w") ("d") (special . h:mm))
|
org-duration-format '(("y") ("w") ("d") (special . h:mm))
|
||||||
|
|
||||||
org-todo-keywords
|
org-treat-S-cursor-todo-selection-as-state-change nil
|
||||||
|
|
||||||
|
org-global-properties
|
||||||
|
'(("Effort_ALL" . "0:00 0:15 0:30 0:45 1:00 2:00 3:00 4:00 5:00 6:00"))
|
||||||
|
|
||||||
|
org-columns-default-format
|
||||||
|
"%80ITEM(Task) %10Effort(Effort){:} %10CLOCKSUM")
|
||||||
|
|
||||||
|
;; Keywords and Tags
|
||||||
|
|
||||||
|
(setq org-todo-keywords
|
||||||
'((sequence "TODO(t)" "CONT(n!)" "|" "DONE(d@)")
|
'((sequence "TODO(t)" "CONT(n!)" "|" "DONE(d@)")
|
||||||
(sequence "GOTO(g)" "ATTN(a)" "|" "DONE(d@)")
|
(sequence "GOTO(g)" "ATTN(a)" "|" "DONE(d@)")
|
||||||
(sequence "READ(r)" "CONT(n!)" "|" "DONE(d@)")
|
(sequence "READ(r)" "CONT(n!)" "|" "DONE(d@)")
|
||||||
|
@ -769,18 +780,11 @@ With given ARG, display files in `db/important-document-path’."
|
||||||
(:endgroup . nil)
|
(:endgroup . nil)
|
||||||
("NOTE" . ?n))
|
("NOTE" . ?n))
|
||||||
|
|
||||||
org-treat-S-cursor-todo-selection-as-state-change nil
|
org-fast-tag-selection-single-key 'expert)
|
||||||
org-fast-tag-selection-single-key 'expert
|
|
||||||
|
|
||||||
org-global-properties
|
|
||||||
'(("Effort_ALL" . "0:00 0:15 0:30 0:45 1:00 2:00 3:00 4:00 5:00 6:00"))
|
|
||||||
|
|
||||||
org-columns-default-format
|
|
||||||
"%80ITEM(Task) %10Effort(Effort){:} %10CLOCKSUM"
|
|
||||||
|
|
||||||
;; Faces
|
;; Faces
|
||||||
|
|
||||||
org-todo-keyword-faces
|
(setq org-todo-keyword-faces
|
||||||
'(("TODO" :foreground "red" :weight normal)
|
'(("TODO" :foreground "red" :weight normal)
|
||||||
("GOTO" :foreground "red" :weight normal)
|
("GOTO" :foreground "red" :weight normal)
|
||||||
("READ" :foreground "red" :weight normal)
|
("READ" :foreground "red" :weight normal)
|
||||||
|
@ -798,22 +802,22 @@ With given ARG, display files in `db/important-document-path’."
|
||||||
org-priority-faces
|
org-priority-faces
|
||||||
'((?A . (:foreground "Red" :weight bold))
|
'((?A . (:foreground "Red" :weight bold))
|
||||||
(?B . (:foreground "firebrick"))
|
(?B . (:foreground "firebrick"))
|
||||||
(?C . (:foreground "tomato")))
|
(?C . (:foreground "tomato"))))
|
||||||
|
|
||||||
;; Refiling
|
;; Refiling
|
||||||
|
|
||||||
org-refile-targets '((org-agenda-files . (:maxlevel . 9))
|
(setq org-refile-targets '((org-agenda-files . (:maxlevel . 9))
|
||||||
(nil . (:maxlevel . 9)))
|
(nil . (:maxlevel . 9)))
|
||||||
org-refile-use-outline-path 'file
|
org-refile-use-outline-path 'file
|
||||||
org-refile-allow-creating-parent-nodes 'confirm
|
org-refile-allow-creating-parent-nodes 'confirm
|
||||||
org-indirect-buffer-display 'current-window
|
org-indirect-buffer-display 'current-window
|
||||||
org-outline-path-complete-in-steps nil
|
org-outline-path-complete-in-steps nil
|
||||||
org-refile-target-verify-function 'db/verify-refile-target
|
org-refile-target-verify-function 'db/verify-refile-target)
|
||||||
|
|
||||||
;; Bable
|
;; Bable
|
||||||
|
|
||||||
org-babel-load-languages '((shell . t)
|
(setq org-babel-load-languages '((shell . t)
|
||||||
(emacs-lisp . t)))
|
(emacs-lisp . t))))
|
||||||
:config (progn
|
:config (progn
|
||||||
;; Reset checkboxes if the RESET_CHECK_BOXES property is set
|
;; Reset checkboxes if the RESET_CHECK_BOXES property is set
|
||||||
(add-hook 'org-after-todo-state-change-hook 'org-reset-checkbox-state-maybe)
|
(add-hook 'org-after-todo-state-change-hook 'org-reset-checkbox-state-maybe)
|
||||||
|
|
Loading…
Reference in New Issue