Skip to content

Instantly share code, notes, and snippets.

@sattvik
Created April 20, 2010 17:15
Show Gist options
  • Star 0 You must be signed in to star a gist
  • Fork 0 You must be signed in to fork a gist
  • Save sattvik/372766 to your computer and use it in GitHub Desktop.
Save sattvik/372766 to your computer and use it in GitHub Desktop.
(ns #^{:doc "An example program that uses Jetty 7 to serve HelloServlet"
:author "Daniel Solano Gómez"}
jetty-hello-demo
(:import org.eclipse.jetty.server.Server
org.eclipse.jetty.webapp.WebAppContext))
(defn- create-webapp []
(doto (WebAppContext.)
(.setContextPath "/")
(.setWar "/path/to/blah.war")))
(defn- create-server []
(doto (Server. 8081)
(.setStopAtShutdown true)
(.setHandler (create-webapp))))
(def jetty-server (create-server))
(.start jetty-server)
Sign up for free to join this conversation on GitHub. Already have an account? Sign in to comment