emacs: update

This commit is contained in:
Paul Walker
2021-01-28 21:48:51 +00:00
parent 905d53b8c5
commit f6f0253a5e
4 changed files with 106 additions and 40 deletions

View File

@@ -1,45 +1,51 @@
(setq org-directory "~/data/org")
(setq org-agenda-files "~/data/org")
(setq org-catch-invisible-edits t)
;; (setq org-hide-emphasis-markers t)
;; (setq org-src-fontify-natively t
;; org-src-tab-acts-natively t)
;; (setq org-startup-indented t
;; org-hide-leading-stars t)
(setq org-startup-indented t)
;;(setq org-hide-leading-stars t)
;; (setq org-export-with-smart-quotes t
;; org-export-backends '(beamer html md))
(setq org-tag-alist (quote (("irdeto" . ?i)
("nagra" . ?n)
("security" . ?s)
("admin" . ?a))))
;; (setq org-tag-alist (quote (("article" . ?a) ;; temporary
;; ("books" . ?b)
;; ("work" . ?w)
;; ("noexport" . ?x)
;; ("cash" . ?$))))
;; (setq org-todo-keywords
;; '((sequence "TODO(t)" "IN-PROGRESS(i)" "|" "DONE(d!)")
;; (sequence "WAITING(w@/!)" "|" "CANCELED(c@)")))
(setq org-todo-keywords
'((sequence "TODO(t)" "IN-PROGRESS(i)" "|" "DONE(d!)")
(sequence "WAITING(w@/!)" "|" "CANCELED(c@)")
(sequence "IN-REVIEW(r)"))
;; (setq org-todo-keyword-faces
;; (quote (("TODO" :foreground "red" :weight bold)
;; ("NEXT" :foreground "blue" :weight bold)
;; ("DONE" :foreground "forest green" :weight bold)
;; ("WAITING" :foreground "orange" :weight bold)
;; ("HOLD" :foreground "magenta" :weight bold)
;; ("CANCELLED" :foreground "forest green" :weight bold)
;; ("MEETING" :foreground "forest green" :weight bold)
;; ("PHONE" :foreground "forest green" :weight bold))))
(setq org-todo-keyword-faces
(quote (("TODO" :foreground "red" :weight bold)
("NEXT" :foreground "blue" :weight bold)
("DONE" :foreground "forest green" :weight bold)
("WAITING" :foreground "orange" :weight bold)
("HOLD" :foreground "magenta" :weight bold)
("CANCELLED" :foreground "forest green" :weight bold)
("MEETING" :foreground "forest green" :weight bold)
("PHONE" :foreground "forest green" :weight bold))))
;; (setq org-use-fast-todo-selection t)
;; (setq org-treat-S-cursor-todo-selection-as-state-change nil)
;; (add-to-list 'auto-mode-alist '("\\.\\(org\\|org_archive\\)$" . org-mode))
(add-to-list 'auto-mode-alist '("\\.\\(org\\|org_archive\\)$" . org-mode))
;; (setq org-agenda-files (list
;; "~/data/org/notes.org"
;; "~/data/org/work.org"))
;; (setq org-directory "~/data/org/")
;; "~/data/org/work.org"))
;; (setq org-default-notes-file "~/data/org/refile.org")
;; (setq org-deadline-warning-days 7
@@ -49,19 +55,19 @@
;; (setq org-deadline-warning-days 7
;; org-agenda-span 'fortnight)
;; (setq org-capture-templates
;; '(
;; ("n"
;; "Note"
;; entry
;; (file+headline "~/data/org/notes.org" "Notes")
;; "* %? %(org-set-tags) :note:\n:PROPERTIES:\n:Created: %U\n:Linked: %A\n:END:\n%i" ; template
;; :prepend t ; properties
;; :empty-lines 1 ; properties
;; :created t ; properties
;; :kill-buffer t ; properties
;; ;; For notes or something regarding more work
;; )
(setq org-capture-templates
'(
("n"
"Note"
entry
(file+headline "~/data/org/notes.org" "Notes")
"* %? %(org-set-tags) :note:\n:PROPERTIES:\n:Created: %U\n:Linked: %A\n:END:\n%i" ; template
:prepend t ; properties
:empty-lines 1 ; properties
:created t ; properties
:kill-buffer t ; properties
;; For notes or something regarding more work
)
;; (
;; "w" ; key
;; "Work" ; name
@@ -74,7 +80,7 @@
;; :kill-buffer t ; properties
;; )
;; )
;; )
))
;; (setq org-refile-targets '((nil :maxlevel . 9)
;; (org-agenda-files :maxlevel . 9)))