diff options
author | Tim <contact@bytim.eu> | 2025-05-16 16:09:34 +0200 |
---|---|---|
committer | Tim <contact@bytim.eu> | 2025-05-16 16:09:34 +0200 |
commit | 8cb2c95d253f0a0c1216ac396288f38c238e6b13 (patch) | |
tree | 9821fafee5a98b0ca7e7b7e75f2fb2d04823030c /src/chef/pages/admin/api.clj | |
parent | 89761adad91ff03e7a203b94133474f02a760697 (diff) | |
download | chef-8cb2c95d253f0a0c1216ac396288f38c238e6b13.tar.xz chef-8cb2c95d253f0a0c1216ac396288f38c238e6b13.zip |
Add feature to create children categories
Diffstat (limited to 'src/chef/pages/admin/api.clj')
-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")))) |