 
 (defn recommendation-completed-list [data]
   (ef/at "#recommenations-completed" (ef/content (map recommendation-completed data))))
+
+(defn specialization-available-list [data]
+  (ef/at "#specializations-available" (ef/content (map specialization-available data))))
 
 (defn try-load-recommendations []
   (GET (str "/recommendation/list/" (:username @user))

       {:handler recommendation-completed-list
        :error-handler error-handler}))

(defn refresh []
  (try-load-recommendations)
  (try-load-recommendations-completed))

(defn try-mark-as-completed [recommendation]
  (POST (str "/recommendation/mark-as-completed/" (:username @user) "/" (:recommendation/id recommendation))

         (ef/do-> (ef/content (kmg-header))
                  (ef/append (kmg-content))
                  (ef/append (kmg-sidebar))))
  (refresh)
  #_(try-load-recommendations)
  #_(try-load-recommendations-completed)
  (try-get-users)
  (observe-change-user))

