    :title (getinputvalue "upd_title")
    :employeename (getinputvalue "upd_employeename")
    :date (getinputvalue "upd_date")
-   :location (getinputvalue "upd_location")
-   })
-
-
+   :location (getinputvalue "upd_location")})
 
 (defn click-update[id]
   (.assign js/location (str "#/documents/update/" id)))

                (r/render [render-documents (getdata json)]
                          (.getElementById js/document "app1")))]
    (http-get (str "http://localhost:8193/documents/title/" stext) onres)))
(defn row [label input]
  [:div.row
   [:div.col-md-2 [:label label]]
   [:div.col-md-5 input]])
(defn radio [label name value]
  [:div.radio
   [:label
    [:input {:field :radio :name name :value value}]
    label]])
(defn input
  ([label type id value]
   (row label [:input.form-control {:type type :id id :defaultValue value}]))

   :title (getinputvalue "title")
   :employeename (getinputvalue "employeename")
   :date (getinputvalue "date")
   :location (getinputvalue "location") })

(defn save [event]
  (let [onres (fn[data] (set! (.-location js/window) "http://localhost:8193"))]
