+dashboard.el


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

;;; $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!!!"))
(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))