                 "mark-github"
                 :face 'font-lock-keyword-face)
                (propertize " Homepage" 'face 'font-lock-keyword-face))
-       'action '(lambda (_) (browse-url "https://github.com/hlissner/.emacs.d")))
+       'action '(lambda (_) (browse-url "https://github.com/hlissner/.emacs.d"))
+       'follow-link t)
 
       (insert "    ")
 

                (set-window-margins window pad pad)
                (setq height (max 0
                                  (min (or height 9999)
                                       (- (truncate (/ (window-height window) 2)) 14))))))
            (get-buffer-window-list doom-buffer nil t))
      (when (or (not doom--scratch-width)
                (not doom--scratch-height)
                (/= doom--scratch-width width)
                (/= doom--scratch-height height)
                t)
        (erase-buffer)
        (insert (propertize
                 (concat

    (add-hook 'window-configuration-change-hook 'doom-reload-scratch-buffer)))

(defun doom--scratch-menu ()
  (let ((all-the-icons-scale-factor 1.3)
        (all-the-icons-default-adjust -0.05)
        (start (point)) end)
    (with-temp-buffer
