325222ba620b

AAAAARRRARRRRRRGGGGGGGGGHHHHHHGHHHH
[view raw] [browse files]
author Steve Losh <steve@stevelosh.com>
date Tue, 09 Aug 2011 09:23:07 -0400
parents a95ebcff284a
children 6f54b979c6b5
branches/tags (none)
files src/clojurecraft/in.clj

Changes

diff -r a95ebcff284a -r 325222ba620b src/clojurecraft/in.clj
--- a/src/clojurecraft/in.clj	Tue Aug 09 00:28:51 2011 -0400
+++ b/src/clojurecraft/in.clj	Tue Aug 09 09:23:07 2011 -0400
@@ -631,7 +631,7 @@
 ; Reading Wrappers -----------------------------------------------------------------
 (defn read-packet [bot prev]
   (let [conn (:connection bot)
-        packet-id-byte (-read-byte conn)]
+        packet-id-byte (to-unsigned (-read-byte conn))]
     (let [packet-id (when (not (nil? packet-id-byte))
                       packet-id-byte)
           packet-type (packet-types packet-id)]