9874586e98d1
protocol 23 support
author | Jason Dufair <jase@dufair.org> |
---|---|
date | Tue, 31 Jan 2012 11:39:50 -0500 |
parents | 80438ed06cbf |
children | e207b5fdb092 |
branches/tags | (none) |
files | src/clojurecraft/core.clj src/clojurecraft/out.clj |
Changes
--- 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))
--- 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}]