registry.clj

Branches > facts > 5ee0ea7 > files / src / net / bowmap / network / packets / registry.clj

(ns net.bowmap.network.packets.registry
  (:require
   [net.bowmap.network.packet :as pk]
   [net.bowmap.network.packets.clientbound :as clientbound]
   [net.bowmap.network.registry :as reg]))

; Not in love with this...
(defn registry-packets []
  (for [[id m] (partition 2 reg/registries)]
    {::pk/id ::clientbound/registry-data
     ::reg/id id
     ::reg/entries (for [[entry-id data] m]
                     {::reg/entry-id entry-id
                      ::reg/entry-data data})}))