feat: send custom event with code eval state payload

viebel · Dec 3, 2017 · dd78e9e · dd78e9e
1 parent fd1662a
commit dd78e9e
Showing 1 changed file with 5 additions and 0 deletions.
diff --git a/src/klipse/klipse_editors.cljs b/src/klipse/klipse_editors.cljs
@@ -52,6 +52,11 @@
           (swap! state update-in [:eval-counter] inc)
           (let [evaluation-chan (eval-fn (str preamble src-code) @state)
                 first-result (<! evaluation-chan)]
+            (let [custom-event (js/CustomEvent. "klipse-snippet-evaled"
+                                                #js {:detail {:state (clj->js @state)
+                                                              :src-code src-code}})]
+              (when-let [code-mirror-dom-node (js/document.querySelector ".klipse-container")]
+                (-> code-mirror-dom-node (.dispatchEvent custom-event))))
             (setter first-result)
             (when loop-msec
               (go-loop []