component did update for scaled question

src/cljs/lernmeister/components/question_types/scaled/views/report.cljs

@@ -103,6 +103,16 @@
 
                        :plugins [{:afterDatasetsDraw #(afterDraw % {:mean mean :stdev stdev})}]
                        }))))
+      :component-did-update
+      (fn [comp]
+        (let [bars (:bars (reagent/props comp))
+              freqs (:freqs (reagent/props comp))]
+          (oset! @chart-instance "data.labels" (clj->js bars))
+          (oset! @chart-instance "data.datasets.0.data"
+                 (clj->js (mapv
+                           #(get freqs % 0)
+                           bars)))
+          (.update @chart-instance)))
       :component-will-unmount
       (fn []
         (when @chart-instance
@@ -120,7 +130,7 @@
 
 (defn scale [question & {:keys [answers on-change]}]
   (let [id (gensym)]
-    (fn [question & {:keys [answer on-change]}]
+    (fn [question & {:keys [answers on-change]}]
       (let [abstention? (:abstention question)
             freqs (frequencies (map :value answers))
             stats (freq/stats (dissoc freqs :abstention))
@@ -142,7 +152,6 @@
            (str "s=" (gstring/format "%.1f" (:stdev stats))) [:br]
            ]
           ]]
-
         ))))