mirror of
https://github.com/penpot/penpot.git
synced 2026-04-27 12:18:32 +00:00
22 lines
610 B
Clojure
22 lines
610 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.core :as wrk]
|
|
[uxbox.worker.align]))
|
|
|
|
(enable-console-print!)
|
|
|
|
(defn- on-message
|
|
[event]
|
|
(let [message (t/decode (.-data event))]
|
|
(wrk/handler message)))
|
|
|
|
(defonce _
|
|
(.addEventListener js/self "message" on-message))
|