Compare commits
2 commits
014025d8a7
...
cb49eaf0af
Author | SHA1 | Date | |
---|---|---|---|
KemoNine | cb49eaf0af | ||
KemoNine | aede4d4cc0 |
18
code/init.el
18
code/init.el
|
@ -1,6 +1,22 @@
|
||||||
;; -*- lexical-binding: t; -*-
|
;; -*- lexical-binding: t; -*-
|
||||||
;; TURN ON IN INIT FILE!!!!!
|
|
||||||
|
|
||||||
|
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
|
||||||
|
; windows performance tweaks
|
||||||
|
(when (eq system-type 'windows-nt)
|
||||||
|
; https://lists.gnu.org/archive/html/bug-gnu-emacs/2012-10/msg00274.html
|
||||||
|
; https://gioorgi.com/2013/solving-emacs-freeze-andor-slowdown-on-windows7/
|
||||||
|
(setq w32-get-true-file-attributes nil)
|
||||||
|
|
||||||
|
; https://www.reddit.com/r/emacs/comments/c9ef5i/comment/esx5ndr/
|
||||||
|
(setq inhibit-compacting-font-caches t)
|
||||||
|
|
||||||
|
; https://www.reddit.com/r/emacs/comments/c9ef5i/comment/esx5snw/
|
||||||
|
(when (boundp 'w32-pipe-read-delay)
|
||||||
|
(setq w32-pipe-read-delay 0))
|
||||||
|
)
|
||||||
|
|
||||||
|
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
|
||||||
|
; misc performance tweaks
|
||||||
;; Make gc pauses faster by decreasing the threshold.
|
;; Make gc pauses faster by decreasing the threshold.
|
||||||
(setq gc-cons-threshold (* 2 1000 1000))
|
(setq gc-cons-threshold (* 2 1000 1000))
|
||||||
|
|
||||||
|
|
|
@ -1,9 +1,32 @@
|
||||||
|
; log to drawer of entry
|
||||||
|
(setq org-log-into-drawer t)
|
||||||
|
(setq org-treat-insert-todo-heading-as-state-change t)
|
||||||
|
|
||||||
|
; the ! tells org to log state changes for todo entries
|
||||||
(setq org-todo-keywords
|
(setq org-todo-keywords
|
||||||
'((sequence "TODO(t)" "READY(r)" "WIP(w)" "|" "SKIPPED(k)" "COMPLETE(c)" "CANCELED(x)"))
|
'((sequence "TODO(t!)" "READY(r!)" "WIP(w!)" "|" "SKIPPED(k!)" "COMPLETE(c!)" "CANCELED(x!)"))
|
||||||
)
|
)
|
||||||
(setq org-todo-keyword-faces
|
(setq org-todo-keyword-faces
|
||||||
'(("TODO" . "turquoise") ("READY" . "yellow") ("WIP" . "magenta") ("COMPLETE" . "green") ("CANCELED" . "orange"))
|
'(("TODO" . "turquoise") ("READY" . "yellow") ("WIP" . "magenta") ("COMPLETE" . "green") ("CANCELED" . "orange"))
|
||||||
)
|
)
|
||||||
|
|
||||||
|
; mangle the 'ARCHIVE' property of todo's so they archive off to a year/month.org file when complete
|
||||||
|
(defun my/org-set-archive-prop-for-todo ()
|
||||||
|
(interactive)
|
||||||
|
(org-set-property "ARCHIVE" (concat
|
||||||
|
"~/org/Attic/org-mode/%s/"
|
||||||
|
(format-time-string "%Y" (current-time))
|
||||||
|
"/"
|
||||||
|
(format-time-string "%m" (current-time))
|
||||||
|
".archive.org::datetree/"
|
||||||
|
)
|
||||||
|
))
|
||||||
|
|
||||||
|
; hooks to auto manage todo 'ARCHIVE' property
|
||||||
|
(add-hook 'org-after-todo-state-change-hook 'my/org-set-archive-prop-for-todo)
|
||||||
|
; auto archive complete todo items
|
||||||
|
;(add-hook 'org-mode-hook (lambda () (add-hook 'after-save-hook 'org-archive-all-done nil t)))
|
||||||
|
|
||||||
(setq org-tags-exclude-from-inheritance (quote ("@recipe" "@budgetbytes"
|
(setq org-tags-exclude-from-inheritance (quote ("@recipe" "@budgetbytes"
|
||||||
"@vegan" "@vegetarian"
|
"@vegan" "@vegetarian"
|
||||||
"@instapot" "@slowcooker" "@onepot" "@oven" "@baked" "@baking" "@dehydrator" "@ricecooker"
|
"@instapot" "@slowcooker" "@onepot" "@oven" "@baked" "@baking" "@dehydrator" "@ricecooker"
|
||||||
|
|
18
org/init.el
18
org/init.el
|
@ -1,6 +1,22 @@
|
||||||
;; -*- lexical-binding: t; -*-
|
;; -*- lexical-binding: t; -*-
|
||||||
;; TURN ON IN INIT FILE!!!!!
|
|
||||||
|
|
||||||
|
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
|
||||||
|
; windows performance tweaks
|
||||||
|
(when (eq system-type 'windows-nt)
|
||||||
|
; https://lists.gnu.org/archive/html/bug-gnu-emacs/2012-10/msg00274.html
|
||||||
|
; https://gioorgi.com/2013/solving-emacs-freeze-andor-slowdown-on-windows7/
|
||||||
|
(setq w32-get-true-file-attributes nil)
|
||||||
|
|
||||||
|
; https://www.reddit.com/r/emacs/comments/c9ef5i/comment/esx5ndr/
|
||||||
|
(setq inhibit-compacting-font-caches t)
|
||||||
|
|
||||||
|
; https://www.reddit.com/r/emacs/comments/c9ef5i/comment/esx5snw/
|
||||||
|
(when (boundp 'w32-pipe-read-delay)
|
||||||
|
(setq w32-pipe-read-delay 0))
|
||||||
|
)
|
||||||
|
|
||||||
|
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
|
||||||
|
; misc performance tweaks
|
||||||
;; Make gc pauses faster by decreasing the threshold.
|
;; Make gc pauses faster by decreasing the threshold.
|
||||||
(setq gc-cons-threshold (* 2 1000 1000))
|
(setq gc-cons-threshold (* 2 1000 1000))
|
||||||
|
|
||||||
|
|
Reference in a new issue