From 8c0631fe66c0e5fc1be15c5b1ca51ac1dbc9c42d Mon Sep 17 00:00:00 2001 From: Josha von Gizycki Date: Tue, 27 Mar 2018 19:53:17 +0200 Subject: [PATCH] change parameter order --- src/wanijo/forms.clj | 2 +- src/wanijo/schema/routes.clj | 4 ++-- 2 files changed, 3 insertions(+), 3 deletions(-) diff --git a/src/wanijo/forms.clj b/src/wanijo/forms.clj index f73d619..f512aba 100644 --- a/src/wanijo/forms.clj +++ b/src/wanijo/forms.clj @@ -14,7 +14,7 @@ [:span.flash__pred (:pred prob)]]) (:clojure.spec.alpha/problems spec-data)))) -(defn field [req form-def field] +(defn field [form-def field req] (let [field-value (get-in req [:params field]) field-def (get-in form-def [:fields field]) {:keys [label required] spec-key :spec} field-def diff --git a/src/wanijo/schema/routes.clj b/src/wanijo/schema/routes.clj index 988dc36..bf2c144 100644 --- a/src/wanijo/schema/routes.clj +++ b/src/wanijo/schema/routes.clj @@ -33,12 +33,12 @@ [:h1 "Pali sin e jaki ijo"] (hform/form-to [:post "/schema/new"] - (forms/field req new-schema-form :schema-name) + (forms/field new-schema-form :schema-name req) (hform/submit-button "Pali") (anti-forgery-field))]))) (defn- new! [req] - (if (forms/valid? req new-schema-form) + (if (forms/valid? new-schema-form req) (resp/redirect "/schema") (overview! req)))