gistfile1.clj

(ns prototype.web
  (:require [clojure.contrib.logging :as log]
            [ring.adapter.jetty :as ring-jetty]
            [ring.middleware.reload :as ring-reload]
            [ring.middleware.stacktrace :as ring-stacktrace]
            [ring.middleware.session :as ring-session]
            [hiccup.core :as hi]))

(defn handler
  [req]
  (log/info req)
  {:status 200})

(defn start-webserver
  []
  (ring-jetty/run-jetty
   #'handler
   {:port 8080 :join? false}))