complete-computing-environment/emacs_dashboard.org

41 lines
1.4 KiB
Org Mode

:PROPERTIES:
:ID: cce/emacs_dashboard
:END:
#+TITLE: Emacs Dashboard
#+filetags: :Emacs:Tool:
#+PROPERTY: header-args :mkdirp yes :results none
#+PROPERTY: header-args:emacs-lisp :tangle dashboard.el
#+ARROYO_EMACS_MODULE: dashboard
#+ARCOLOGY_KEY: cce/dashboard
#+ARROYO_MODULE_WANTS: cce/configure_packaging.org
#+ARCOLOGY_ALLOW_CRAWL: t
#+begin_src emacs-lisp
(provide 'cce/dashboard)
(use-package dashboard
:after org
:demand
:init
(dashboard-setup-startup-hook)
(setq initial-buffer-choice (lambda () (get-buffer "*dashboard*"))
dashboard-banner-logo-title "Welcome Home to the Arcology"
dashboard-startup-banner "~/org/data/arcology.png"
dashboard-center-content t
show-week-agenda-p t)
(setq dashboard-items '((recents . 5)
(agenda . 5)
(projects . 5)
(registers . 5)))
(setq dashboard-footer-messages
`(,(concat "don't blow the horn \\ "
"don't bang the drums \\ "
"don't be the head \\ "
"be the lion's rear")
,(concat "i can feel the rain \\ "
"long across open water \\ "
"you've traveled to me \\ "
"you meet the sun and take her \\ "
"she will return to me soon \\ ")
"Do you see the sun? Do you see the signs Spring is coming?")))
#+end_src