;; 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 (ns app.worker.impl (:require [okulary.core :as l] [app.util.transit :as t])) (enable-console-print!) ;; --- Handler (defmulti handler :cmd) (defmethod handler :default [message] (println "Unexpected message:" message)) (defmethod handler :echo [message] message) (defmethod handler :initialize-indices [message] (handler (-> message (assoc :cmd :selection/initialize-index))) (handler (-> message (assoc :cmd :snaps/initialize-index)))) (defmethod handler :update-page-indices [message] (handler (-> message (assoc :cmd :selection/update-index))) (handler (-> message (assoc :cmd :snaps/update-index))))