 (defonce server (atom nil))
 
 (defn start-server []
-  (reset! server (server/run-server #'wrap-handler {:port 3000 :join? false})))
+  (reset! server (server/run-server #'wrap-handler {:port http-port :join? false})))
 
 (defn stop-server []
   (when-not (nil? server)

;(defresource article
;  :available-media-types ["text/html"]
;  :allowed-methods [:get :options]
;  :handle-ok (fn [ctx] (str "Id of the request: " (get-in ctx [:request :route-params :id]))))

(defresource article
  :available-media-types ["application/edn" "text/html"]

           [liberator.core :refer [resource defresource]]
           [ring.middleware.params :refer [wrap-params]]
           [bidi.ring :refer [make-handler]]
           [org.httpkit.server :as server]
           [environ.core :refer [env]])
  (:gen-class))

(defn -main
