e860102

src/net/bowmap/server/protocol/clientbound_packets.clj modified (view file)

@@ -9,7 +9,7 @@ (def clientbound-packets   "Map of connection phases to pairs of [clientbound-packet-id writer]"   {::phase/status-   [::status-response [::t/status-response json->]+   [::status-response [::t/status-response status-response->]     ::pong-response [::t/timestamp long->]]    ::phase/login    [::disconnect ?

src/net/bowmap/server/protocol/writers.clj modified (view file)

@@ -37,6 +37,10 @@ (defn json-> [buf s]   (string-> buf (json/write-str s))) +(defn status-response-> [buf {:keys! [version-name protocol]}]+  (json-> buf {:version {:name version-name+                         :protocol protocol}}))+ (defn length-prefixed   "Returns a new ByteBuf prefixed by an encoded varint of the length of 'buf'."   [buf]