mirror of
https://github.com/penpot/penpot.git
synced 2025-05-30 19:46:12 +02:00
✨ Send version and build data to worker configuration
This commit is contained in:
parent
5cb39874a2
commit
6b3a988526
3 changed files with 20 additions and 10 deletions
|
@ -17,8 +17,10 @@
|
|||
[]
|
||||
(let [worker (uw/init cf/worker-uri err/on-error)]
|
||||
(uw/ask! worker {:cmd :configure
|
||||
:key :public-uri
|
||||
:val cf/public-uri})
|
||||
:config {:public-uri cf/public-uri
|
||||
:build-data cf/build-date
|
||||
:version cf/version}})
|
||||
|
||||
(set! instance worker)))
|
||||
|
||||
(defn ask!
|
||||
|
|
|
@ -135,15 +135,15 @@
|
|||
(rx/debounce 1)
|
||||
|
||||
(rx/subs! (fn [[messages dropped last]]
|
||||
;; Send back the dropped messages replies
|
||||
;; Send back the dropped messages replies
|
||||
(doseq [msg dropped]
|
||||
(drop-message msg))
|
||||
|
||||
;; Process the message
|
||||
;; Process the message
|
||||
(doseq [msg (vals messages)]
|
||||
(handle-message msg))
|
||||
|
||||
;; After process the buffer we send a clear
|
||||
;; After process the buffer we send a clear
|
||||
(when-not (= last ::clear)
|
||||
(rx/push! buffer ::clear)))))))
|
||||
|
||||
|
|
|
@ -50,8 +50,16 @@
|
|||
(handler (assoc message :cmd :snaps/update-page-index))))
|
||||
|
||||
(defmethod handler :configure
|
||||
[{:keys [key val]}]
|
||||
(log/info :hint "configure worker" :key key :val (dm/str val))
|
||||
(case key
|
||||
:public-uri
|
||||
(set! cf/public-uri val)))
|
||||
[{:keys [config]}]
|
||||
(log/info :hint "configure worker" :keys (keys config))
|
||||
|
||||
(when-let [public-uri (get config :public-uri)]
|
||||
(set! cf/public-uri public-uri))
|
||||
|
||||
(when-let [version (get config :version)]
|
||||
(set! cf/version version))
|
||||
|
||||
(when-let [build-date (get config :build-data)]
|
||||
(set! cf/build-date build-date))
|
||||
|
||||
nil)
|
||||
|
|
Loading…
Add table
Add a link
Reference in a new issue