diff options
Diffstat (limited to 'src/chef/pages/admin')
-rw-r--r-- | src/chef/pages/admin/api.clj | 7 |
1 files changed, 5 insertions, 2 deletions
diff --git a/src/chef/pages/admin/api.clj b/src/chef/pages/admin/api.clj index 2eb797b..0d1910a 100644 --- a/src/chef/pages/admin/api.clj +++ b/src/chef/pages/admin/api.clj @@ -7,7 +7,10 @@ (defn create-category [req] (cutils/auth-only req - (jdbc/execute! @cdb/db (sql/format {:insert-into [:categories] - :values [{:name "New category"}]})) + (jdbc/execute! @cdb/db + (sql/format {:insert-into [:categories] + :values [(merge {:name "New category"} + (when-let [parent (get-in req [:params "parent"])] + {:parent parent}))]})) (-> (ruresp/created "Created.") (ruresp/header "HX-Refresh" "true")))) |