summaryrefslogtreecommitdiff
path: root/emacs/inits/06-dashboard.el
blob: 4c6d2a77a9b18ead43bc81e67ee70dd7fcc5cfc7 (plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
;; Time-stamp: <2019-11-12 10:56:10 (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" "tao" "wisdom"))
  (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 3
        dashboard-items '((recents . 5)
                          (projects . 5)
                          (fortune . 0))
        dashboard-init-info (format "Welcome ~%s!" (user-login-name)))

  (dashboard-setup-startup-hook))