0
Fork 0
mirror of https://github.com/penpot/penpot.git synced 2025-02-09 08:38:15 -05:00
penpot/frontend/src/uxbox/worker.cljs
2016-11-20 20:03:17 +01:00

21 lines
612 B
Clojure

;; This Source Code Form is subject to the terms of the Mozilla Public
;; License, v. 2.0. If a copy of the MPL was not distributed with this
;; file, You can obtain one at http://mozilla.org/MPL/2.0/.
;;
;; Copyright (c) 2016 Andrey Antukh <niwi@niwi.nz>
(ns uxbox.worker
(:require [beicon.core :as rx]
[uxbox.util.transit :as t]
[uxbox.worker.impl :as impl]
[uxbox.worker.align]))
(enable-console-print!)
(defn- on-message
[event]
(let [message (t/decode (.-data event))]
(impl/handler message)))
(defonce _
(.addEventListener js/self "message" on-message))