diff options
Diffstat (limited to 'src/chef/components')
-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."))) |