                    :mouse-face 'highlight
                    :follow-link "\C-m"
                    (propertize "Update Spacemacs" 'face 'font-lock-keyword-face))
-    (spacemacs-buffer//center-line)
+    (let ((len (- (line-end-position)
+                  (line-beginning-position))))
+      (spacemacs-buffer//center-line)
+      (setq spacemacs-buffer--buttons-position (- (line-end-position)
+                                                  (line-beginning-position)
+                                                  len)))
     (insert "\n")
     (widget-create 'push-button
                    :help-echo "Update all ELPA packages to the latest versions."

                  (when (spacemacs-buffer//insert-file-list
                         "Projects:"
                         (spacemacs//subseq (projectile-relevant-known-projects)
                                     0 list-size))
                    (spacemacs//insert--shortcut "p" "Projects:")
                    (insert list-separator)))))) dotspacemacs-startup-lists))))

(defun spacemacs-buffer/goto-link-line ()
  "Set point to the beginning of the link line."

(defvar spacemacs-buffer--fresh-install
  (not (file-exists-p dotspacemacs-filepath))
  "Non-nil if this Emacs instance if a fresh install.")

(defvar spacemacs-buffer--buttons-position nil
  "Offset in characters between the edge of the screen and the beginning of the
 home buffer buttons. Do not set this variable.")

(defvar spacemacs-buffer-mode-map
  (let ((map (make-sparse-keymap)))
