core.clj

(ns foojs.core
  (:use noir.core)
  (:require [noir.server :as server]
            [noir.server.handler :as handler]
            [ring.middleware.file :as file]
  )
)

(defpage "/welcome" []
    "Welcome to Noir!")

(defn -main [& m]
  (let [mode (keyword (or (first m) :dev))
        port (Integer. (get (System/getenv) "PORT" "8080"))]
    (handler/add-custom-middleware file/wrap-file "public/")
    (server/start port )))