Skip to content

Commit

Permalink
Browse files Browse the repository at this point in the history
fix heroku integration
  • Loading branch information
raimohanska committed Aug 27, 2012
1 parent f723a69 commit 32ce68a
Show file tree
Hide file tree
Showing 4 changed files with 10 additions and 3 deletions.
1 change: 1 addition & 0 deletions .gitignore
@@ -1,3 +1,4 @@
lib lib
.lein-deps-sum .lein-deps-sum
.lein-plugins .lein-plugins
*.war
2 changes: 1 addition & 1 deletion Procfile
@@ -1 +1 @@
web: lein trampoline run -m baconjs.web $PORT web: lein trampoline run -m baconjs.web
3 changes: 2 additions & 1 deletion project.clj
Expand Up @@ -2,6 +2,7 @@
:description "Bacon.js site" :description "Bacon.js site"
:dependencies [[org.clojure/clojure "1.4.0"] :dependencies [[org.clojure/clojure "1.4.0"]
[compojure "1.1.1"] [compojure "1.1.1"]
[hiccup "1.0.0"]] [hiccup "1.0.0"]
[ring/ring-jetty-adapter "0.3.9"]]
:plugins [[lein-ring "0.7.1"]] :plugins [[lein-ring "0.7.1"]]
:ring {:handler baconjs.web/app}) :ring {:handler baconjs.web/app})
7 changes: 6 additions & 1 deletion src/baconjs/web.clj
@@ -1,6 +1,7 @@
(ns baconjs.web (ns baconjs.web
(:use compojure.core (:use compojure.core
[hiccup.middleware :only (wrap-base-url)]) [hiccup.middleware :only (wrap-base-url)]
ring.adapter.jetty)
(:require [compojure.route :as route] (:require [compojure.route :as route]
[compojure.handler :as handler] [compojure.handler :as handler]
[compojure.response :as response] [compojure.response :as response]
Expand All @@ -16,3 +17,7 @@
(def app (def app
(-> (handler/site main-routes) (-> (handler/site main-routes)
(wrap-base-url))) (wrap-base-url)))

(defn -main []
(let [port (Integer/parseInt (get (System/getenv) "PORT" "8080"))]
(run-jetty app {:port port})))

0 comments on commit 32ce68a

Please sign in to comment.