Compare commits

5 Commits
Author SHA1 Message Date
msyds cc48c11448 fix: update host aliases
build / build (push) Failing after 30s
2026-06-29 19:15:49 -06:00
msyds 7e73ef399a chore(emacs): dired switches 2026-06-29 19:15:23 -06:00
msyds ba158c9ee8 fix(emacs): transient comes from straight 2026-06-29 19:15:09 -06:00
msyds 5c5b6682ae fix(emacs): geiser popup
build / build (push) Failing after 24s
2026-06-29 19:14:45 -06:00
msyds 90ad26daf6 fix(emacs): project relative path: return nil when not in project
build / build (push) Failing after 38s
2026-06-29 19:05:28 -06:00
5 changed files with 12 additions and 8 deletions
@@ -48,7 +48,10 @@ directory."
'("-l" ; Mandatory!
"--almost-all" ; Show hidden files; omit '.' and '..'.
"--human-readable" ; Display sizes in human-readable units.
"--time-style=+") ; Omit times/dates.
"--time-style=+" ; Omit times/dates.
"-D" ; special diredslop
"-v" ; sort dotfiles first
"--group-directories-first")
" "))
;; Always copy recursively
(dired-recursive-copies 'always)
@@ -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")
@@ -20,7 +20,8 @@
:load-buffer #'geiser-eval-buffer)
(syd-push
shackle-rules
`("*Geiser Documentation*" ,@syd-help-popup-options)))
`("*Geiser Documentation*" ,@syd-help-popup-options)
`("*Geiser Debug*" ,@syd-help-popup-options)))
(use-package geiser-guile)
@@ -3,7 +3,6 @@
(require 'syd/base)
(use-package transient
:straight nil
:custom ((transient-history-file
(file-name-concat syd-data-dir "transient/history.el"))))
+4 -4
View File
@@ -4,10 +4,10 @@
config = {
networking.hosts = {
"100.95.131.43" = [ "whitepc" ];
"192.168.68.66" = [ "guix-rebound" "sydpc" ];
"192.168.68.79" = [ "deertopia" ];
"192.168.68.55" = [ "fruitbook" ];
"192.168.68.62" = [ "buffalo-nas" ];
"10.0.0.109" = [ "guix-rebound" "sydpc" ];
"10.0.0.248" = [ "deertopia" ];
"10.0.0.218" = [ "fruitbook" ];
"10.0.0.203" = [ "buffalo-nas" ];
};
};
}