# HG changeset patch
# User Steve Losh <steve@stevelosh.com>
# Date 1308704652 14400
# Node ID 77024563a900a4c4c669c9d4af5d96179640a3f8
# Parent  a5dd7fa97088a4be714d67d6e194376e35472fa7
Moar.

diff -r a5dd7fa97088 -r 77024563a900 src/clojurecraft/core.clj
--- a/src/clojurecraft/core.clj	Tue Jun 21 21:01:51 2011 -0400
+++ b/src/clojurecraft/core.clj	Tue Jun 21 21:04:12 2011 -0400
@@ -160,6 +160,7 @@
           (assoc :z (-read-int conn))))
 
 
+; Reading Wrappers -----------------------------------------------------------------
 (defn read-packet [conn packet-id]
       (let [packet-id (int packet-id)
             packet-type (packet-types packet-id)]
@@ -178,7 +179,7 @@
         (println "\n\n\n")))
 
 
-; Reading Wrappers -----------------------------------------------------------------
+; Connection Handling --------------------------------------------------------------
 (defn login [conn]
     ; Send handshake
     (write-packet conn :handshake {:username "timmy"})
@@ -206,7 +207,7 @@
 
 
 
-; REPL -----------------------------------------------------------------------------
+; Scratch --------------------------------------------------------------------------
 ;(def server (connect minecraft-local))
 ;(disconnect server)