   form-value)
 
 (defmethod produce-maze-value :analysis
+  [_ form-value _]
+  form-value)
+
+(defmethod produce-maze-value :active
   [_ form-value _]
   form-value)
 

          (dom/label nil
                     "Analysis: "
                     (dom/select #js {:value analysis
                                      :onChange (partial modify :analysis)}
                                 (map (fn [name] (dom/option #js {:key name} name)) analyses))))
        (when (contains? #{"distances" "path"} analysis)

            (dom/label nil
                       "Start Column: "
                       (dom/input #js {:type "number"
                                       :disabled active
                                       :value start-col
                                       :min 0
                                       :max (dec columns)
