registry.clj

Branches > main > a713166 > files / src / net / bowmap / network / protocol / message / registry.clj

(ns net.bowmap.network.protocol.message.registry
  (:require
   [net.bowmap.network.protocol.message :as msg]
   [net.bowmap.network.protocol.message.clientbound :as client]
   [net.bowmap.network.protocol.registry :as reg]))

(defn registry-messages []
  (for [[id m] (partition 2 reg/registries)]
    {::msg/id ::client/registry-data
     ::reg/id id
     ::reg/entries (for [[entry-id data] m]
                     {::reg/entry-id entry-id
                      ::reg/entry-data data})}))