org-mode: config update

This commit is contained in:
Henrik Lissner 2016-03-13 15:31:02 -04:00
parent 3145cd315a
commit 1d00ab7a9d

View file

@ -5,7 +5,7 @@
(add-hook 'org-load-hook 'narf|org-hacks t) (add-hook 'org-load-hook 'narf|org-hacks t)
(add-hook 'org-mode-hook 'narf|org-hook) (add-hook 'org-mode-hook 'narf|org-hook)
(defvar org-directory (expand-file-name "~/Dropbox/docs/")) (defvar org-directory (expand-file-name "~/Dropbox/notes/"))
(define-minor-mode evil-org-mode (define-minor-mode evil-org-mode
"Evil-mode bindings for org-mode." "Evil-mode bindings for org-mode."
@ -36,12 +36,15 @@
(defun narf|org-init () (defun narf|org-init ()
(setq-default (setq-default
org-export-coding-system 'utf-8
;; Appearance ;; Appearance
org-indent-mode-turns-on-hiding-stars t org-indent-mode-turns-on-hiding-stars t
org-adapt-indentation nil org-adapt-indentation nil
org-blank-before-new-entry '((heading . nil) (plain-list-item . auto)) org-blank-before-new-entry '((heading . nil) (plain-list-item . auto))
;; org-bullets-bullet-list '("•" "◦" "•" "◦" "•" "◦") ;; org-bullets-bullet-list '("•" "◦" "•" "◦" "•" "◦")
org-cycle-separator-lines 1 org-cycle-separator-lines 1
org-cycle-include-plain-lists t
org-ellipsis 'hs-face org-ellipsis 'hs-face
org-entities-user '(("flat" "\\flat" nil "" "" "266D" "") org-entities-user '(("flat" "\\flat" nil "" "" "266D" "")
("sharp" "\\sharp" nil "" "" "266F" "")) ("sharp" "\\sharp" nil "" "" "266F" ""))
@ -82,20 +85,22 @@
;; Agenda ;; Agenda
org-agenda-restore-windows-after-quit nil org-agenda-restore-windows-after-quit nil
org-agenda-skip-unavailable-files nil org-agenda-skip-unavailable-files nil
org-agenda-window-setup 'other-frame
org-agenda-dim-blocked-tasks nil org-agenda-dim-blocked-tasks nil
org-agenda-window-setup 'other-frame ; to get org-agenda to behave with shackle...
org-agenda-inhibit-startup t org-agenda-inhibit-startup t
org-agenda-files (f-entries org-directory (lambda (path) (f-ext? path "org"))) org-agenda-files (f-entries org-directory (lambda (path) (f-ext? path "org")))
org-todo-keywords '((sequence "[ ](t)" "[-](p)" "|" "[X](d)") org-todo-keywords '((sequence "[ ](t)" "[-](p)" "|" "[X](d)")
(sequence "TODO(T)" "|" "DONE(D)") (sequence "TODO(T)" "|" "DONE(D)")
(sequence "IDEA(i)" "NEXT(n)" "ACTIVE(a)" "WAITING(w)" "LATER(l)" "|" "CANCELLED(c)")) (sequence "IDEA(i)" "NEXT(n)" "ACTIVE(a)" "WAITING(w)" "LATER(l)" "|" "CANCELLED(c)"))
;; Babel ;; Babel
org-confirm-babel-evaluate nil ; you don't need my permission org-confirm-babel-evaluate nil ; you don't need my permission
org-src-fontify-natively t ; make code pretty org-src-fontify-natively t ; make code pretty
org-src-preserve-indentation t org-src-preserve-indentation t
org-src-tab-acts-natively t org-src-tab-acts-natively t
org-src-window-setup 'current-window org-src-window-setup 'current-window
org-edit-src-content-indentation 0
;; Latex ;; Latex
org-format-latex-options (plist-put org-format-latex-options :scale 1.3) org-format-latex-options (plist-put org-format-latex-options :scale 1.3)
@ -135,7 +140,8 @@
'((python . t) (ruby . t) (sh . t) (js . t) (css . t) '((python . t) (ruby . t) (sh . t) (js . t) (css . t)
(plantuml . t) (emacs-lisp . t) (matlab . t) (plantuml . t) (emacs-lisp . t) (matlab . t)
(latex . t) (calc . t) (lisp . t) (lilypond . t) (latex . t) (calc . t) (lisp . t) (lilypond . t)
(go . t) (http . t) ;; (go . t)
(http . t)
(rust . t))) (rust . t)))
(let ((ext-regexp (regexp-opt '("GIF" "JPG" "JPEG" "SVG" "TIF" "TIFF" "BMP" "XPM" (let ((ext-regexp (regexp-opt '("GIF" "JPG" "JPEG" "SVG" "TIF" "TIFF" "BMP" "XPM"