 (defn o2register-add-template []
   (let [add-data (r/atom {:isactive true})
         focus (r/atom nil)]
-    (fn [] [o2register-template 
-           "o2register Add Form" 
+    (fn [] [o2register-template
+           "o2register Add Form"
            add-data focus
            #(o2register-add-form-onclick add-data focus)])))
 

  (let [onres (fn[json](
                       (set-key-value :villages (getdata json))
                       (set-page! [o2register-add-template])))
        ono2resp (fn [json] ((set-key-value :o2mutations
                                           (clj->js (cons "select" (js->clj (getdata json)))))))]
    (http-get (str serverhost "mutations/o2numbers/search") ono2resp)
    (http-get (str serverhost "villages") onres)))


(defn masavi-add-template []
  (let [add-data (r/atom {:isactive true})
        focus (r/atom nil)]
    (fn [] [masavi-template
           "masavi Add Form"
           add-data focus
           #(masavi-add-form-onclick add-data focus)])))

(defn masavi-update-template [id dmt]
  (let [update-data (r/atom {:id (int id)
