stuff

1 files changed, 17 insertions, 16 deletions

diff --git a/lisp/webapps/resume/clojurescript/resume/src/core.cljs b/lisp/webapps/resume/clojurescript/resume/src/core.cljs
index 036e866..0a3e6c2 100644
--- a/lisp/webapps/resume/clojurescript/resume/src/core.cljs
+++ b/lisp/webapps/resume/clojurescript/resume/src/core.cljs
@@ -1525,7 +1525,7 @@
      [:th {:scope "col"} "Mod"]
      [:th {:scope "col"} "Del"]]]
    [:tbody
-    (for [education (get jsonobj "educations")]
+    (for [education (get jsonobj "components")]
       [:tr
        [:td (get education "school")]
        [:td (get education "start_date")]
@@ -1615,22 +1615,22 @@
 
 ;; education-modify-submit
 
-(defn on-education-modify-submit-clicked []
+(defn on-education-modify-submit-clicked [id]
   (when (-> (jquery "#education-modify-form")
             (.get "0")
             (.checkValidity))
     (.modal (jquery "#modify") "hide")
-    (render-education-modify-submit)))
+    (render-education-modify-submit id)))
 
 (defn handler-education-modify-submit [response]
   (let [jsonobj (js->clj (js/JSON.parse response))]
     (auth-notifications jsonobj)
     (on-menu-clicked "/resume/education")))
 
-(defn render-education-modify-submit []
+(defn render-education-modify-submit [id]
   (POST "/resume/education/modify/submit"
         {:format :raw
-         :params {:id (dommy/value (dommy/sel1 :#id))
+         :params {:id id
                   :school (dommy/value (dommy/sel1 :#school))
                   :major (dommy/value (dommy/sel1 :#major))
                   :minor (dommy/value (dommy/sel1 :#minor))
@@ -1711,7 +1711,7 @@
      [:th {:scope "col"} "Mod"]
      [:th {:scope "col"} "Del"]]]
    [:tbody
-    (for [language (get jsonobj "languages")]
+    (for [language (get jsonobj "components")]
       [:tr
        [:td (get language "name")]
        [:td (get language "understanding_listening")]
@@ -1799,22 +1799,22 @@
 
 ;; language-modify-submit
 
-(defn on-language-modify-submit-clicked []
+(defn on-language-modify-submit-clicked [id]
   (when (-> (jquery "#language-modify-form")
             (.get "0")
             (.checkValidity))
     (.modal (jquery "#modify") "hide")
-    (render-language-modify-submit)))
+    (render-language-modify-submit id)))
 
 (defn handler-language-modify-submit [response]
   (let [jsonobj (js->clj (js/JSON.parse response))]
     (auth-notifications jsonobj)
     (on-menu-clicked "/resume/language")))
 
-(defn render-language-modify-submit []
+(defn render-language-modify-submit [id]
   (POST "/resume/language/modify/submit"
         {:format :raw
-         :params {:id (dommy/value (dommy/sel1 :#id))
+         :params {:id id
                   :name (dommy/value (dommy/sel1 :#name))
                   :understanding_listening (dommy/value (dommy/sel1 :#understanding_listening))
                   :understanding_reading (dommy/value (dommy/sel1 :#understanding_reading))
@@ -1889,7 +1889,7 @@
      [:th {:scope "col"} "Mod"]
      [:th {:scope "col"} "Del"]]]
    [:tbody
-    (for [skill (get jsonobj "skills")]
+    (for [skill (get jsonobj "components")]
       [:tr
        [:td (get skill "skill")]
        [:td {:width "30"}
@@ -1967,22 +1967,22 @@
 
 ;; skill-modify-submit
 
-(defn on-skill-modify-submit-clicked []
+(defn on-skill-modify-submit-clicked [id]
   (when (-> (jquery "#skill-modify-form")
             (.get "0")
             (.checkValidity))
     (.modal (jquery "#modify") "hide")
-    (render-skill-modify-submit)))
+    (render-skill-modify-submit id)))
 
 (defn handler-skill-modify-submit [response]
   (let [jsonobj (js->clj (js/JSON.parse response))]
     (auth-notifications jsonobj)
     (on-menu-clicked "/resume/skill")))
 
-(defn render-skill-modify-submit []
+(defn render-skill-modify-submit [id]
   (POST "/resume/skill/modify/submit"
         {:format :raw
-         :params {:id (dommy/value (dommy/sel1 :#id))
+         :params {:id id
                   :skill (dommy/value (dommy/sel1 :#skill))}
          :handler handler-skill-modify-submit}))
 
@@ -2019,7 +2019,8 @@
         (= handler "/resume/contactinfo") (render-contactinfo)
         (= handler "/resume/education") (render-education)
         (= handler "/resume/language") (render-language)
-        (= handler "/resume/skill") (render-skill)))
+        (= handler "/resume/skill") (render-skill)
+        (= handler "/resume/job") (render-job)))
 
 (defn handler-location [response]
   (let [jsonobj (js->clj (js/JSON.parse response))]