Fix edge case in magit forge remote prompt

Sometimes (doom-project-root) can return nil
2024-03-13 02:15:02 +08:00 · 2024-03-13 02:15:02 +08:00 · c8109d0518
parent eb41f1b872
commit c8109d0518
1 changed files with 5 additions and 3 deletions
--- a/config.org
+++ b/config.org
@ -3729,9 +3729,11 @@ the pre-filled remote url use ssh.
  :filter-args #'magit-remote-add
  (interactive
   (let ((default-name
-           (subst-char-in-string ?\s ?-
-                                 (file-name-nondirectory
-                                  (directory-file-name (doom-project-root))))))
+          (subst-char-in-string
+           ?\s ?-
+           (file-name-nondirectory
+            (directory-file-name
+             (or (doom-project-root) default-directory))))))
     (or (and +magit-default-forge-remote
              (not (magit-list-remotes))
              (eq (read-char-choice