diff --git a/modules/ui/doom-dashboard/autoload.el b/modules/ui/doom-dashboard/autoload.el
index 63a55b153..898ae8a4f 100644
--- a/modules/ui/doom-dashboard/autoload.el
+++ b/modules/ui/doom-dashboard/autoload.el
@@ -1,5 +1,10 @@
 ;;; ui/doom-dashboard/autoload.el -*- lexical-binding: t; -*-
 
+(defun +doom-dashboard--help-echo ()
+  (when-let* ((btn (button-at (point)))
+              (msg (button-get btn 'help-echo)))
+    (message "%s" msg)))
+
 ;;;###autoload
 (defun +doom-dashboard/open (frame)
   "Switch to the dashboard in the current window, of the current FRAME."
@@ -12,10 +17,12 @@
 (defun +doom-dashboard/forward-button (n)
   "Like `forward-button', but don't wrap."
   (interactive "p")
-  (forward-button n nil))
+  (forward-button n nil)
+  (+doom-dashboard--help-echo))
 
 ;;;###autoload
 (defun +doom-dashboard/backward-button (n)
   "Like `backward-button', but don't wrap."
   (interactive "p")
-  (backward-button n nil))
+  (backward-button n nil)
+  (+doom-dashboard--help-echo))
diff --git a/modules/ui/doom-dashboard/config.el b/modules/ui/doom-dashboard/config.el
index abfcf4837..d9cdc643b 100644
--- a/modules/ui/doom-dashboard/config.el
+++ b/modules/ui/doom-dashboard/config.el
@@ -416,16 +416,17 @@ controlled by `+doom-dashboard-pwd-policy'."
                                                     #',action)))
                          'face (or face 'font-lock-keyword-face)
                          'follow-link t
-                         'help-echo label)
+                         'help-echo
+                         (format "%s (%s)" label
+                                 (propertize (symbol-name action) 'face 'font-lock-constant-face)))
                         (format "%-37s" (buffer-string)))
                       ;; Lookup command keys dynamically
                       (or (when-let* ((key (where-is-internal action nil t)))
-                            (propertize (with-temp-buffer
-                                          (save-excursion (insert (key-description key)))
-                                          (while (re-search-forward "<\\([^>]+\\)>" nil t)
-                                            (replace-match (upcase (substring (match-string 1) 0 3))))
-                                          (buffer-string))
-                                        'face 'font-lock-constant-face))
+                            (with-temp-buffer
+                              (save-excursion (insert (key-description key)))
+                              (while (re-search-forward "<\\([^>]+\\)>" nil t)
+                                (replace-match (upcase (substring (match-string 1) 0 3))))
+                              (propertize (buffer-string) 'face 'font-lock-constant-face)))
                           ""))))
            (if (display-graphic-p)
                "\n\n"