       (insert (make-string (- left-margin 1) ?\ ))
       (insert-image spec)
       (insert "\n\n")
-      (insert "                           [S P A C E M A C S]\n\n"))))
+      (insert (make-string (+ left-margin
+                              (floor (/ (- width (length title)) 2))) ?\ ))
+      (insert (format "%s\n\n" title)))))
 
 (defun spacemacs-buffer//inject-version ()
   "Inject the current version of spacemacs in the first line of the


(defun spacemacs-buffer//insert-buttons ()
  (goto-char (point-max))
  (insert "    ")
  (spacemacs//insert--shortcut "m" "[?]" t)
  (widget-create 'url-link
                 :tag (propertize "?" 'face 'font-lock-doc-face)

      (delete-char -1))
    (let* ((hpadding (or hpadding 1))
           (fill-column (if width
                            (- width (+ 2 (* 2 hpadding)))
                          fill-column))
           (sentence-end-double-space nil)
           (caption-len (length caption)))
