Skip to content

Instantly share code, notes, and snippets.

@weavejester
Created September 26, 2010 15:26
  • Star 1 You must be signed in to star a gist
  • Fork 1 You must be signed in to fork a gist
Star You must be signed in to star a gist
Save weavejester/598020 to your computer and use it in GitHub Desktop.
Ring parameter example
;; When executed, this file will run a basic web server
;; on http://localhost:8080.
(ns ring.example.params
(:use ring.middleware.params
ring.util.response
ring.adapter.jetty))
(defn page [name]
(str "<html><body>"
(if name
(str "Nice to meet you, " name "!")
(str "<form>"
"Name: <input name='name' type='text'>"
"<input type='submit'>"
"</form>"))
"</body></html>"))
(defn handler [{{name "name"} :params}]
(-> (response (page name))
(content-type "text/html")))
(def app
(-> handler wrap-params))
(run-jetty app {:port 8080})
Sign up for free to join this conversation on GitHub. Already have an account? Sign in to comment