diff options
| author | Tim <contact@bytim.eu> | 2025-05-11 12:12:50 +0200 |
|---|---|---|
| committer | Tim <contact@bytim.eu> | 2025-05-11 12:12:50 +0200 |
| commit | 06ecbc8c6d52f3e832683e68a52461c5f7c6cb84 (patch) | |
| tree | 25f4a4f6881549ca1d6fdd1da0a4b8ff2965e9e0 /src/chef/components/search.clj | |
| parent | 77594fd2b62e4ea3e6a55fed2dabcce50e618bd3 (diff) | |
| download | chef-06ecbc8c6d52f3e832683e68a52461c5f7c6cb84.tar.xz chef-06ecbc8c6d52f3e832683e68a52461c5f7c6cb84.zip | |
Add basic home page; TODO: use real data for home page
Diffstat (limited to 'src/chef/components/search.clj')
| -rw-r--r-- | src/chef/components/search.clj | 14 |
1 files changed, 14 insertions, 0 deletions
diff --git a/src/chef/components/search.clj b/src/chef/components/search.clj new file mode 100644 index 0000000..843f907 --- /dev/null +++ b/src/chef/components/search.clj @@ -0,0 +1,14 @@ +(ns chef.components.search + (:require [hiccup2.core :as html] + [ring.util.response :as ruresp])) + +(defn render [query] + [:p "Results; Query: " query]) + +(defn handler [req] + (if-let [query (get-in req [:params "query"])] + (-> (render query) + html/html + str + ruresp/response) + (ruresp/bad-request "No search query provide."))) |