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)