summaryrefslogtreecommitdiff
path: root/src/chef/pages/admin
diff options
context:
space:
mode:
Diffstat (limited to 'src/chef/pages/admin')
-rw-r--r--src/chef/pages/admin/api.clj7
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"))))