# HG changeset patch
# User Jason Dufair <jase@dufair.org>
# Date 1328027990 18000
# Node ID 9874586e98d18e71a76fc1853a8173ffc4d9c8a5
# Parent  80438ed06cbf7254b2c2867eeb5c5a46f486adbe
protocol 23 support

diff -r 80438ed06cbf -r 9874586e98d1 src/clojurecraft/core.clj
--- a/src/clojurecraft/core.clj	Fri Sep 16 13:45:14 2011 -0400
+++ b/src/clojurecraft/core.clj	Tue Jan 31 11:39:50 2012 -0500
@@ -41,7 +41,7 @@
   (read-packet bot nil nil nil)
 
   ; Send login
-  (write-packet bot :login {:version 14 :username username})
+  (write-packet bot :login {:version 23 :username username})
 
   ; Get login
   (get (get (read-packet bot nil nil nil) 0) 1))
diff -r 80438ed06cbf -r 9874586e98d1 src/clojurecraft/out.clj
--- a/src/clojurecraft/out.clj	Fri Sep 16 13:45:14 2011 -0400
+++ b/src/clojurecraft/out.clj	Tue Jan 31 11:39:50 2012 -0500
@@ -54,6 +54,11 @@
   (-write-int conn version)
   (-write-string-ucs2 conn username)
   (-write-long conn 0)
+  (-write-string-ucs2 conn "")
+  (-write-int conn 0)
+  (-write-byte conn 0)
+  (-write-byte conn 0)
+  (-write-byte conn 0)
   (-write-byte conn 0))
 
 (defn- write-packet-chat [conn {message :message}]