Support nix/home-manager-switch

As a part of my plan to reduce my dependence on the shell, I defined an Elisp
function to call `home-manager switch` from `M-x`.

1 files changed, 10 insertions, 0 deletions

diff --git a/emacs/.emacs.d/wpc/wpc-nix.el b/emacs/.emacs.d/wpc/wpc-nix.el
index b259a66b8955..678bef33b4e2 100644
--- a/emacs/.emacs.d/wpc/wpc-nix.el
+++ b/emacs/.emacs.d/wpc/wpc-nix.el
@@ -29,6 +29,16 @@
                  "nix-env" "-f" "<briefcase>" "-iA" "emacs")
   (display-buffer "*nix-build/<briefcase/emacs>*"))
 
+(defun nix/home-manager-switch ()
+  "Use Nix to reconfigure the user environment."
+  (interactive)
+  (start-process "nix/home-manager-switch" "*nix/home-manager-switch*"
+                 "home-manager"
+                 "-I" (format "nixpkgs=%s" (f-expand "~/nixpkgs"))
+                 "-I" (format "home-manager=%s" (f-expand "~/home-manager"))
+                 "switch")
+  (display-buffer "*nix/home-manager-switch*"))
+
 (defun nix/sly-from-briefcase (attribute)
   "Start a Sly REPL configured with a Lisp matching a derivation
   from my monorepo.