From 6ad4bbbe8ca40cb2bb98946d9cf0dbcf616cf12f Mon Sep 17 00:00:00 2001 From: =?UTF-8?q?Madeleine=20Sydney=20=C5=9Alaga?= Date: Mon, 15 Jun 2026 16:07:28 -0600 Subject: [PATCH] fix(emacs): project relative path: return nil when not in project --- modules/home/users/msyds/emacs/lisp/syd/prelude.el | 3 ++- 1 file changed, 2 insertions(+), 1 deletion(-) diff --git a/modules/home/users/msyds/emacs/lisp/syd/prelude.el b/modules/home/users/msyds/emacs/lisp/syd/prelude.el index 480e542..ac832d4 100755 --- a/modules/home/users/msyds/emacs/lisp/syd/prelude.el +++ b/modules/home/users/msyds/emacs/lisp/syd/prelude.el @@ -202,7 +202,8 @@ form." s)))) (defun syd-project-relative-file-name (file-name) - (file-relative-name file-name (project-root (project-current)))) + (when-let* ((proj (project-current))) + (file-relative-name file-name (project-root proj)))) (defvar syd-insert-file-name-alist `((,#'syd-project-relative-file-name . "Project-relative")