   (let ((path (doom-module-locate-path category module)))
     (unless (file-readable-p path)
       (error "'%s %s' isn't a valid module; it doesn't exist" category module))
-    (if-let* ((readme-path (doom-module-locate-path category module "README.org")))
+    (if-let (readme-path (doom-module-locate-path category module "README.org"))
         (find-file readme-path)
       (if (y-or-n-p (format "The '%s %s' module has no README file. Explore its directory?"
                             category module))

      (describe-function fn))))

(defun doom--help-modules-list ()
  (cl-loop for path in (doom-module-load-path 'all)
           for (cat . mod) = (doom-module-from-path path)
           for location = (cons (or (doom-module-locate-path cat mod "README.org")
                                    (doom-module-locate-path cat mod))

                 (format "%s %s" (nth 1 sexp) (nth 2 sexp)))))))
        ((and buffer-file-name
              (when-let (mod (doom-module-from-path buffer-file-name))
                (unless (memq (car mod) '(:core :private))
                  (format "%s %s" (car mod) (cdr mod))))))
        ((when-let (mod (cdr (assq major-mode doom--help-major-mode-module-alist)))
           (format "%s %s"
                   (symbol-name (car mod))
