From 6f05b185099fc3f423fbdf736b8f747eab479d43 Mon Sep 17 00:00:00 2001 From: Vineet Kumar Date: Fri, 22 May 2026 10:10:08 -0400 Subject: files/emacs: add vin/guix-deploy function --- epistemia/files/emacs/.config/emacs/init.el | 11 +++++++++-- 1 file changed, 9 insertions(+), 2 deletions(-) diff --git a/epistemia/files/emacs/.config/emacs/init.el b/epistemia/files/emacs/.config/emacs/init.el index 3f4afda..052e191 100644 --- a/epistemia/files/emacs/.config/emacs/init.el +++ b/epistemia/files/emacs/.config/emacs/init.el @@ -388,7 +388,7 @@ (use-package guix) (defun vin/guix-system-reconfigure () - "Runs `guix system reconfigure` to reconfigure the current system." + "Reconfigure the current GuixSD system." (interactive) (let* ((hostname (car (split-string (system-name) "\\."))) (cfgdir "/data/src/public/guixsd-config")) @@ -397,12 +397,19 @@ cfgdir hostname)))) (defun vin/guix-home-reconfigure () - "Runs `guix home reconfigure` to reconfigure the current user's profile." + "Reconfigure the current guix-home profile." (interactive) (let* ((cfgdir "/data/src/public/guixsd-config")) (message "Running guix home reconfigure") (async-shell-command (format "guix home reconfigure %s/epistemia/home/config.scm" cfgdir)))) +(defun vin/guix-deploy () + "Deploy configuration to defined GuixSD servers." + (interactive) + (let* ((cfgdir "/data/src/public/guixsd-config")) + (message "Running guix home reconfigure") + (async-shell-command (format "guix deploy %s/epistemia/deploy.scm" + cfgdir)))) ;; TODO: skeletor.el remake my templates? at least for org-mode (use-package skeletor) -- cgit v1.2.3