emacs/org/config-org-desktop.el

29 lines
1.0 KiB
EmacsLisp
Raw Normal View History

;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
;; DESKTOP
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
; misc desktop specific overrides
(setq org-habit-graph-column 75)
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
; Personal startup screen (Desktop)
; - preferred org agenda as dedicated window at the top of the frame, n lines high
; - common org files open in the bottom window
(add-hook 'after-init-hook (lambda ()
(interactive)
(find-file "~/org/health/health_houdini.org")
(find-file "~/org/orgzly/_habits.org")
(find-file "~/org/orgzly/_todo.org")
(find-file "~/org/_index.org")
2022-08-26 13:59:45 +00:00
(org-agenda nil "r")
(delete-other-windows)
(split-window-below 15)
(next-multiframe-window)
(find-file "~/org/orgzly/_slipbox.org")
(split-window-below 15)
(next-multiframe-window)
(find-file "~/org/health/health_mike.org")
(next-multiframe-window)
(goto-char 0)
)
)