From 630d099f46065da9c7b583eeb1e6910af14b6128 Mon Sep 17 00:00:00 2001
From: Adrian Malacoda <malacoda@monarch-pass.net>
Date: Mon, 13 Sep 2021 01:23:58 -0500
Subject: [PATCH] Add script to create a guix environment based on a named
 environment template under ~/.config/guix.

---
 genv | 14 ++++++++++++++
 1 file changed, 14 insertions(+)
 create mode 100755 genv

diff --git a/genv b/genv
new file mode 100755
index 0000000..668c31a
--- /dev/null
+++ b/genv
@@ -0,0 +1,14 @@
+#!/usr/bin/env python3
+import sys
+import os
+from subprocess import call
+
+ENV_NAME=sys.argv[1]
+ENV_COMMAND=sys.argv[2:]
+ENVS_DIR=os.path.join(os.path.expanduser("~"), ".config", "guix", "envs")
+
+env_packages = []
+with open(os.path.join(ENVS_DIR, ENV_NAME)) as env_def:
+    env_packages = env_def.read().strip().split(" ")
+
+call(["guix", "environment", "--ad-hoc"] + env_packages + ["--"] + ENV_COMMAND)