diff options
| -rw-r--r-- | +dashboard.el | 11 | ||||
| -rw-r--r-- | +jabber.el | 3 |
2 files changed, 11 insertions, 3 deletions
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)) @@ -10,7 +10,6 @@ :prefix "j" :desc "Jabber connect" "c" #'jabber-connect-all :desc "Jabber disconnect" "q" #'jabber-disconnect - :desc "Jabber roster" "r" #'jabber-switch-to-roster-buffer + :desc "Jabber roster" "r" #'jabber-roster :desc "Jabber new chat" "n" #'jabber-chat-with - :desc "Jabber groupchat" "g" #'jabber-groupchat-join :desc "Jabber set status" "s" #'jabber-send-presence) |