From bb94aa9bae95cb10ce41f3ebe58266e508d58c9d Mon Sep 17 00:00:00 2001 From: Magdalena Szweda Date: Fri, 18 Sep 2026 16:57:57 +0200 Subject: emacs(dash): make the dashboard print a random message list 'dashboard-messages' with multiple messages function 'my/dashboard-random-message' that picks a random message from the list implented in :custom of minimal-dashboard --- +dashboard.el | 11 ++++++++++- 1 file changed, 10 insertions(+), 1 deletion(-) (limited to '+dashboard.el') diff --git a/+dashboard.el b/+dashboard.el index e38b779..0d7cf78 100644 --- a/+dashboard.el +++ b/+dashboard.el @@ -1,8 +1,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 "Vi-Vi-Vi editor of the beast") + (minimal-dashboard-text #'my/dashboard-random-message) (minimal-dashboard-modeline-shown 1)) -- cgit v1.2.3