 (defn consolidation-delete[id]
   (let [onres (fn [json]
                 (secretary/dispatch! "/consolidation"))]
-    (http-delete (str "http://localhost:9000/consolidations/" id)  onres)))
+    (http-delete (str serverhost "consolidations/" id)  onres)))
 
 
 (defroute consolidation-list "/consolidation" []

(defn revenue-delete[id]
  (let [onres (fn [json]
                (secretary/dispatch! "/revenue"))]
    (http-delete (str "http://localhost:9000/revenuerecords/" id)  onres)))


(defroute revenue-list "/revenue" []

  (if (= nil (consolidation-form-validator @data-set))
    (do (reset! data-set (assoc @data-set :villageid (int (.-value (.getElementById js/document "consolidation-districts")))))
        (let [onres (fn[data] (secretary/dispatch! "/consolidation"))]
          (http-put (str serverhost "consolidations/" (:id @data-set)) onres (.serialize (Serializer.) (clj->js @data-set)))))
    (reset! focus "on")))

(defn consolidation-form-cancel [event]
