(ns cargolds.core
  (:require [liberator.core :refer [resource defresource]]
            [ring.middleware.params :refer [wrap-params]]
            [compojure.core :refer [defroutes ANY]]))

;; define a simple parameterized resource

(defresource user [u]
  :available-media-types ["text/html"]
  :handle-ok (fn [_] (format "User info: %s" u)))

;; set up routes to our resources

(defroutes app
  (ANY "/user/:u" [u]
      :allowed-methods [:get :post]
      :handle-ok (fn [_] (user u))
      :post! (fn [_] (format "called post with %s" u))))

(def handler
  (-> app wrap-params))