Advertisement
Guest User

Untitled

a guest
Feb 6th, 2012
143
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
  1. (ns spirit-fund.server
  2.   (:require [noir.server :as server]
  3.             [spirit-fund.models.user :as users]
  4.             [spirit-fund.models :as models]
  5.             [spirit-fund.info :as info]))
  6.  
  7. (server/load-views "src/spirit_fund/views/")
  8.  
  9. (defn -main [& m]
  10.   (let [mode (keyword (or (first m) :dev))
  11.         port (Integer. (get (System/getenv) "PORT" "5001"))
  12.         ssl-port (Integer. "8443")]
  13.     (models/init!)
  14.     (server/start ssl-port {:mode mode
  15.                         :ns 'spirit-fund
  16.                         :jetty-options {:ssl? true
  17.                                         :port port
  18.                                         :ssl-port ssl-port
  19.                                         :join? false
  20.                                         :keystore "sitepkcs12.keystore"
  21.                                         :key-password info/key-pass}})))
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement