From e6361ec1c0942e29aa2ea73542ba3f06b7891988 Mon Sep 17 00:00:00 2001
From: Lee Spector <lspector@hampshire.edu>
Date: Fri, 12 Jan 2024 16:31:46 -0500
Subject: [PATCH] Allow empty argmap

---
 src/propeller/utils.cljc | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/src/propeller/utils.cljc b/src/propeller/utils.cljc
index 30d2c0a..7598f17 100755
--- a/src/propeller/utils.cljc
+++ b/src/propeller/utils.cljc
@@ -51,7 +51,7 @@
   "Returns a random instruction from a supplied pool of instructions, evaluating
   ERC-producing functions to a constant literal."
   [instructions argmap]
-  (case (:closes argmap)
+  (case (or (:closes argmap) :specified)
     :specified (let [instruction (rand-nth instructions)]
                  (if (fn? instruction)
                    (instruction)