;; Time-stamp: <2019-09-11 10:42:40 (tslil@basingstoke)>

(use-package fortune
  :config
  (setq fortune-dir "/usr/share/games/fortunes/"
        fortune-program "fortune"
        fortune-file "/usr/share/games/fortunes/cookie"
        fortune-program-options '("-s"))
  (defun dashboard-fortune (n)
    (insert
     (with-temp-buffer
       (let ((fortune-buffer-name (current-buffer)))
         (fortune-in-buffer t)
         (buffer-string))))))

(use-package dashboard
  :ensure t
  :config
  (add-to-list 'dashboard-item-generators '(fortune . dashboard-fortune))

  (setq dashboard-center-content t
        dashboard-set-init-info t
        dashboard-set-footer nil
        dashboard-startup-banner 1
        dashboard-items '((recents . 5)
                          (projects . 5)
                          (fortune . 0))
        dashboard-init-info (format "Welcome ~%s!" (user-login-name)))

  (dashboard-setup-startup-hook))