complete-computing-environment/emacs_dashboard.org

1.4 KiB

Emacs Dashboard

(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?")))