+dashboard.el


1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19

;;; $DOOMDIR/+dashboard.el -*- lexical-binding: t; -*-

(defvar dashboard-messages
  '("Vi-Vi-Vi editor of the beast"
    "Welcome to Emacs"
    "M-x M-x"
    "nnngh *humps* get pregnant!!!"
    "tetris, a therapist, web browser, music player... oh and a text editor if youre into that."))
(defun my/dashboard-random-message ()
  (nth (random (length dashboard-messages))
       dashboard-messages))
(use-package! minimal-dashboard
  :init
  (setq initial-buffer-choice #'minimal-dashboard)
  :custom
  (minimal-dashboard-buffer-name "*dash*")
  (minimal-dashboard-text #'my/dashboard-random-message)
  (minimal-dashboard-modeline-shown 1))
(setq doom-fallback-buffer-name "*dash*")