msyds/sydnix
1
0
Fork 0
Code Issues 6 Pull Requests 2 Actions Packages Projects Releases Wiki Activity

fix(emacs): project relative path: return nil when not in project
All checks were successful
build / build (push) Successful in 2m52s
Details

Browse Source
This commit is contained in:
Madeleine Sydney Slaga
2026-06-15 16:07:28 -06:00
parent ce31e48d42
commit 6ad4bbbe8c
1 changed files with 2 additions and 1 deletions
Download Patch File Download Diff File Expand all files Collapse all files

3
modules/home/users/msyds/emacs/lisp/syd/prelude.el
View File

@@ -202,7 +202,8 @@ form."
s)))) s))))
(defun syd-project-relative-file-name (file-name) (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 (defvar syd-insert-file-name-alist
`((,#'syd-project-relative-file-name . "Project-relative") `((,#'syd-project-relative-file-name . "Project-relative")