rowan.a.tl/propeller
1
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

Don't call identity on error function

Browse Source
This commit is contained in:
Lee Spector 2021-07-13 18:20:31 -04:00
parent 4954ac3a5f
commit ec65f959f2
1 changed files with 17 additions and 20 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

5
src/propeller/core.cljc
View File

@ -23,7 +23,6 @@
;; Creates problems ;; Creates problems
(require (symbol (str "propeller.problems." (first args)))) (require (symbol (str "propeller.problems." (first args))))
(gp/gp (gp/gp
(update-in
(merge (merge
{:instructions (eval-problem-var (first args) "instructions") {:instructions (eval-problem-var (first args) "instructions")
:error-function (eval-problem-var (first args) "error-function") :error-function (eval-problem-var (first args) "error-function")
@ -40,6 +39,4 @@
:PSB2-problem (clojure.string/replace (first args) #"PSB2." "")} :PSB2-problem (clojure.string/replace (first args) #"PSB2." "")}
(apply hash-map (apply hash-map
(map #(if (and (string? %) (not (.contains % "/"))) (read-string %) %) (map #(if (and (string? %) (not (.contains % "/"))) (read-string %) %)
(rest args)))) (rest args))))))
[:error-function]
identity)))