blob: 2eb797be1e29fa612340c1747ec2cc691ae8ec51 (
plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
|
(ns chef.pages.admin.api
(:require [chef.utils :as cutils]
[chef.database :as cdb]
[next.jdbc :as jdbc]
[honey.sql :as sql]
[ring.util.response :as ruresp]))
(defn create-category [req]
(cutils/auth-only req
(jdbc/execute! @cdb/db (sql/format {:insert-into [:categories]
:values [{:name "New category"}]}))
(-> (ruresp/created "Created.")
(ruresp/header "HX-Refresh" "true"))))
|
