2017-06-03 12:44:50 +02:00
|
|
|
;;; Org mode
|
2014-09-22 17:03:29 +02:00
|
|
|
|
2017-06-16 16:29:52 +02:00
|
|
|
(define-key org-mode-map (kbd "C-c C-a") 'org-agenda)
|
2017-05-15 07:46:20 +02:00
|
|
|
|
2017-06-16 16:29:52 +02:00
|
|
|
(setq
|
|
|
|
;; Move annoying babel folder.
|
|
|
|
org-babel-temporary-directory (concat emacs-cache-folder "babel")
|
|
|
|
;; Disable line splitting on M-RET.
|
|
|
|
org-M-RET-may-split-line '((default))
|
|
|
|
org-insert-heading-respect-content t
|
|
|
|
org-enforce-todo-dependencies t
|
|
|
|
org-deadline-warning-days 7
|
|
|
|
org-agenda-default-appointment-duration 60
|
|
|
|
org-agenda-columns-add-appointments-to-effort-sum t
|
|
|
|
;; Org-mode aligns text.
|
2017-06-22 19:02:12 +02:00
|
|
|
indent-tabs-mode nil)
|
2014-09-22 17:03:29 +02:00
|
|
|
|
2017-06-03 12:44:50 +02:00
|
|
|
;;; Agendas.
|
2016-10-12 09:43:26 +02:00
|
|
|
(add-to-list 'org-agenda-files "~/personal/todo/todo.org")
|
2017-07-27 00:08:58 +02:00
|
|
|
(defun org-find-first-agenda ()
|
|
|
|
(interactive)
|
|
|
|
(find-file (car org-agenda-files)))
|
2014-09-23 09:36:39 +02:00
|
|
|
|
2017-07-02 20:07:19 +02:00
|
|
|
;;; Set PDF association in Org-mode (original is 'default).
|
|
|
|
(setcdr (assoc "\\.pdf\\'" org-file-apps) 'emacs)
|
2014-02-12 18:31:00 +01:00
|
|
|
|
2017-06-16 16:29:52 +02:00
|
|
|
;;; Hooks.
|
|
|
|
(dolist (fun '(turn-off-linum turn-off-indent-tabs turn-off-auto-fill))
|
|
|
|
(add-hook 'org-mode-hook fun))
|
2014-02-13 16:30:05 +01:00
|
|
|
|
2017-07-26 12:11:58 +02:00
|
|
|
(when (require 'org-contacts nil t)
|
|
|
|
(setq org-contacts-files '("~/personal/contacts/contacts.org")))
|
|
|
|
|
2017-06-18 18:50:31 +02:00
|
|
|
(provide 'init-org)
|