Skip to content

Instantly share code, notes, and snippets.

@anildigital
Created February 17, 2015 17:19
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 anildigital/3b911e40b2fa99c66b27 to your computer and use it in GitHub Desktop.
Save anildigital/3b911e40b2fa99c66b27 to your computer and use it in GitHub Desktop.
(ns clojurebyexample.core
(:require [ring.adapter.jetty :as jetty]
[environ.core :refer [env]])
(:use ring.middleware.resource)
(:use ring.middleware.file)
(:use ring.middleware.file-info)
)
(defn handler [request]
{:status 302
:headers {"Location" "/toc.html"}
})
(defn -main [& [port]]
(let [port (Integer. (or port (env :port) 5000))]
(jetty/run-jetty (-> #'handler (wrap-resource "output" )) {:port port :join? false})))
Sign up for free to join this conversation on GitHub. Already have an account? Sign in to comment